# NOT RUN {
(x <- as.snpclone(glSim(100, 1e3, ploid=2)))
# }
# NOT RUN {
# Without parallel processing
system.time(x <- as.snpclone(glSim(1000, 1e5, ploid=2)))
# With parallel processing... doesn't really save you much time.
system.time(x <- as.snpclone(glSim(1000, 1e5, ploid=2, parallel = TRUE),
parallel = TRUE))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab