我有兴趣修改我用corrplot制作的相关表。
我想修改它,所以所有数字类别都在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)