# Load the dataset microbov.
data(microbov)
# List the population names.
popNames(microbov)
# Analyze only the populations with exactly 50 individuals
mic.50 <- popsub(microbov, sublist=c(1:6, 11:15), exclude=c(3,4,13,14))
if (FALSE) {
# Analyze the first 10 populations, except for "Bazadais"
mic.10 <- popsub(microbov, sublist=1:10, exclude="Bazadais")
# Take out the two smallest populations
micbig <- popsub(microbov, exclude=c("NDama", "Montbeliard"))
# Analyze the two largest populations
miclrg <- popsub(microbov, sublist=c("BlondeAquitaine", "Charolais"))
}
Run the code above in your browser using DataLab