Advertisement
Guest User

Untitled

a guest
Feb 22nd, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.13 KB | None | 0 0
  1. library(adegenet)
  2. data(dapcIllus)
  3. x <- dapcIllus$a
  4. grp <- find.clusters(x, max.n.clust = 40)
  5. dapc1 <- dapc(x, grp$grp)
  6. scatter(dapc1)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement