subtree(tree, leaves)
votes.clust <- hclust(dist(votes.repub), "ave") # subtree including 1st and 10th objects subtree(votes.clust, c(1,10))mv.vote <- subtree(votes.clust, match(c("Maryland", "West Virginia", "Virginia"), state.name)) plclust(mv.vote, labels = state.abb)