zwzcosname 2008年7月16日发布 #2 2008年7月16日星期三 00点58分 hc <- hclust(dist(USArrests), "ave") plot(hc) plot(hc, hang = -1) plot(hc, hang = -1, cex=0.8)
zwzcosname hc <- hclust(dist(USArrests), "ave") plot(hc) plot(hc, hang = -1) plot(hc, hang = -1, cex=0.8)