เปลี่ยนการวางแนวของเส้นทแยงมุมของพล็อตความสัมพันธ์โดยใช้แพ็คเกจ ggcorrplot - หากพิมพ์บนหรือล่าง

คุณสามารถพล็อต corr.mat ด้วย geom_tile ด้วยตนเอง:

library(data.table)
library(ggplot2)
cordt <- as.data.table(corr.mat, keep.rownames = 'col_name')
cordt <- melt(cordt, id.vars = 'col_name', variable.name = 'row_name')

# convert to factor so that rows and columns have the same order as the data
cordt[, row_name := factor(row_name, levels = rev(rownames(corr.mat)))]
cordt[, col_name := factor(col_name, levels = rownames(corr.mat))]

# set diagonal and the top-right half of the matrix to 0 so that those cells appears white
cordt[ncol(corr.mat) - as.integer(row_name) < as.integer(col_name), value := 0]
# remove the last column and the bottom row (where left cells are self correlations only)
cordt <- cordt[as.integer(row_name) < ncol(corr.mat) &
        as.integer(col_name) < ncol(corr.mat)]

ggplot(cordt, aes(x = col_name, y = row_name, fill = value)) +
    geom_tile() +
    scale_fill_gradient2(low = 'blue', high = 'red') +
    labs(x = NULL, y = NULL, fill = 'Corr') +
    theme_minimal()

เมื่อฉันต้องการแสดงเพียงครึ่งหนึ่งของเมทริกซ์สหสัมพันธ์ฉันใช้สิ่งนี้ (จากแพ็คเกจ GGally):

ggcorr(mtcars[, c("mpg", "disp", "hp", "drat", "wt", "carb")], method = c('everything', "p"))

อย่างไรก็ตาม เส้นทแยงมุมไม่ได้เป็นสิ่งที่คุณต้องการมากนัก บางทีอาจมีตัวเลือกให้ผกผันมัน