Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- library(adegenet)
- data(dapcIllus)
- x <- dapcIllus$a
- grp <- find.clusters(x, max.n.clust = 40)
- dapc1 <- dapc(x, grp$grp)
- scatter(dapc1)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement