有很多学员或者圈子里的同学给我私信,问我下面这个图怎么绘制的:
提问样图
这幅图很明显是一个对角矩阵系列的统计图形,绘制起来也非常方便,只需要使用R语言中GGally包中的ggpairs() 函数就可以快速绘制,如下:
library(GGally)
data(tips)
pm <- ggpairs(tips)
pm
ggpairs() example01
library(GGally)
pm <- ggpairs(tips, columns = c(1, 6, 2))
pm <- ggpairs(tips, columns = c("total_bill", "time", "tip"), columnLabels = c("Total Bill", "Time of Day", "Tip"))
pm
ggpairs() example02
library(GGally)
library(ggplot2)
pm <- ggpairs(tips, mapping = aes(color = sex), columns = c("total_bill", "time", "tip"))
pm
颜色映射
library(GGally)
ggpairs(iris,
mapping = aes(color = Species),
columns = c('Sepal.Length', 'Sepal.Width', 'Petal.Length', 'Petal.Width', 'Species'),
columnLabels = c('Sepal.Length', 'Sepal.Width', 'Petal.Length', 'Petal.Width', 'Species')) +
scale_colour_manual(values=c('red','blue','orange')) +
theme_minimal()
参考资料
[1]
ggpairs()函数介绍: https://ggobi.github.io/ggally/articles/ggpairs.html。