library("ggplot2")
library("readxl")
my_data <- read_excel("dbmicrobiota_corr_0.5%.xlsx", sheet = "ALL_filtered(BC_PA)>0,5%Microbi")
library(psych)
library(corrplot)
corr_p<- corr.test(my_data[323], my_data[199:218], use = "pairwise", method="spearman", alpha=.05, adjust="none")
mycol <- ifelse(c(corr_p$p < 0.05), "black", "white")
corrplot(corr_p$r, method="color", number.cex = 0.7, addCoef.col=mycol, tl.col="black", p.mat = corr_p$p, sig.level = 0.05, tl.cex=0.75, tl.srt=90, insig = "blank", cl.pos="b", cl.align="l")
Цвет условных обозначений невозможно увидеть, в чем ошибка?