## Not run:
#
# # number of cases
# cases = 250
#
# # number of controls
# controls = 250
#
# # total (cases + controls)
# total = cases + controls
#
# # phenotype vector
# phenotype = c(rep(1,cases), rep(0,controls))
#
# # genotype matrix with 10 variants (random data)
# set.seed(123)
# genotype = matrix(rbinom(total*10, 2, 0.05), nrow=total, ncol=10)
#
# # apply GDBR with 50 permutations
# # (it takes some time to run the permutations!)
# mygdbr = GDBR(phenotype, genotype, perm=50)
# mygdbr
# ## End(Not run)
Run the code above in your browser using DataLab