powered by
corr.rect(clus, rect.col = "black", lwd = 2)
data(mtcars) corr <- cor(mtcars) corrplot(corr, method="circle", order = "PCA") corr.rect(c(6,5))
Run the code above in your browser using DataLab