# NOT RUN {
bdinfo <- readRDS(system.file("extdata/pdata_4_1.bdinfo", package = "GxEScanR"))
covdata <- readRDS(system.file("extdata/covdata.rds", package = "GxEScanR"))
results <- gwas(data = covdata, bdinfo = bdinfo, binary = FALSE)
# }
Run the code above in your browser using DataLab