Parallelization

data(dat50)

system.time(mod <- solarAssoc(traits = "trait", data = phenodata, snpdata = genodata, cores = 1))
##    user  system elapsed 
##   1.020   0.268   2.592
system.time(mod <- solarAssoc(traits = "trait", data = phenodata, snpdata = genodata, cores = 2))
##    user  system elapsed 
##   0.932   0.184   2.079