我最喜欢的用于探索性分析的工具之一是pairs()
,但是在离散值数量有限的情况下,由于所有圆点都完美对齐,因此它变得平坦。考虑以下:
y <- t(rmultinom(n=1000,size=4,prob=rep(.25,4)))
pairs(y)
它并没有真正带来良好的相关性。有替代的情节样式吗?
最佳答案
如果将y更改为data.frame,则可以添加一些“抖动”,并使用col选项可以设置透明度级别(rgb中的第4个数字):
y <- data.frame(y)
pairs(sapply(y,jitter), col = rgb(0,0,0,.2))
或者,您可以使用ggplot2的plotmatrix:
library(ggplot2)
plotmatrix(y) + geom_jitter(alpha = .2)
编辑:由于ggplot2中的plotmatrix已被弃用,请使用ggpairs(上面@hadley的注释中提到的GGally包)
library(GGally)
ggpairs(y, lower = list(params = c(alpha = .2, position = "jitter")))
关于r - 如何为离散值生成有意义的制图员/相关图,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/21691302/