coeff_pvalues <- cortestR(mtcars[, c("wt", "mpg", "qsec", "hp")],
split = TRUE, sign_symbol = FALSE
)
# focus on coefficients:
ggcormat(cor_mat = coeff_pvalues$corout, maxpoint = 5)
# size taken from p-value:
ggcormat(
cor_mat = coeff_pvalues$corout,
p_mat = coeff_pvalues$pout, maxpoint = 5)
Run the code above in your browser using DataLab