# NOT RUN {
simulatedPhenotype <- runSimulation(N=100, P=5, cNrSNP=10,
genVar=0.2, h2s=0.2, phi=1)
# }
# NOT RUN {
outputdir <- savePheno(simulatedPhenotype, directory=tempdir(),
outstring="Data_simulation", format=c("csv", "plink"))
# }
Run the code above in your browser using DataLab