在corrplot中自定义x和y轴

时间:2017-12-13 03:32:48

标签: r r-corrplot

我有兴趣修改我用corrplot制作的相关表。 correlation table

我想修改它,所以所有数字类别都在X轴上,字母在y轴上。无论如何要告诉它我想要在每个轴上的哪些类别?下面是我的R代码。

library(corrplot)
blinded <- read_excel("corralation.xlsx", sheet = "blinded")
corr <- cor(blinded, method = "pearson")

cor.mtest <- function(mat, ...) {
  mat <- as.matrix(mat)
  n <- ncol(mat)
  p.mat<- matrix(NA, n, n)
  diag(p.mat) <- 0
  for (i in 1:(n - 1)) {
    for (j in (i + 1):n) {
      tmp <- cor.test(mat[, i], mat[, j], ...)
      p.mat[i, j] <- p.mat[j, i] <- tmp$p.value
    }
  }
  colnames(p.mat) <- rownames(p.mat) <- colnames(mat)
  p.mat
}

p.mat <- cor.mtest(corr)
head(p.mat[, 1:5])

col <- colorRampPalette(c("#EFFF00", "#228B22"))
corrplot(corr, method="color", col=col(200),  
         type="upper", order="hclust", 
         addCoef.col = "black", 
         tl.col="black", tl.srt=45, 
         p.mat = p.mat, sig.level = 0.01, insig = "blank", 
         diag=FALSE)

0 个答案:

没有答案