# NOT RUN {
(sc <- as.snpclone(glSim(100, 1e3, ploid=2, parallel = FALSE),
parallel = FALSE, n.cores = 1L))
is.snpclone(sc)
is.clone(sc)
data(nancycats)
nanclone <- as.genclone(nancycats)
is.genclone(nanclone)
# }
Run the code above in your browser using DataLab