data= read.csv(file.choose())library(corrplot)library(RColorBrewer)library(psych)data<-cbind(X,Y)corMat = cor(data, method="spearman")cor.plot(corMat,numbers=TRUE,colors=TRUE,tl.col="black", tl.srt=45, n=51,main=NULL,labels=NULL, cex...