如何为离散值生成有意义的制图员/相关图 [英] How to produce a meaningful draftsman/correlation plot for discrete values
问题描述
我最喜欢的探索性分析工具之一是pairs()
,但是在离散值数量有限的情况下,由于点都完全对齐,它会变得平坦.请考虑以下内容:
One of my favorite tools for exploratory analysis is pairs()
, however in the case of a limited number of discrete values, it falls flat as the dots all align perfectly. Consider the following:
y <- t(rmultinom(n=1000,size=4,prob=rep(.25,4)))
pairs(y)
它并没有真正带来良好的关联感.有替代的情节样式吗?
It doesn't really give a good sense of correlation. Is there an alternative plot style that would?
推荐答案
如果将y更改为data.frame,则可以添加一些抖动",并使用col选项可以设置透明度(rgb中的第4个数字) ):
If you change y to a data.frame you can add some 'jitter' and with the col option you can set the transparency level (the 4th number in rgb):
y <- data.frame(y)
pairs(sapply(y,jitter), col = rgb(0,0,0,.2))
或者您可以使用ggplot2的plotmatrix:
Or you could use ggplot2's plotmatrix:
library(ggplot2)
plotmatrix(y) + geom_jitter(alpha = .2)
由于ggplot2中的plotmatrix已被弃用,请使用ggpairs(上面@hadley的注释中提到的GGally包)
Since plotmatrix in ggplot2 is deprecated use ggpairs (GGally package mentioned in @hadley's comment above)
library(GGally)
ggpairs(y, lower = list(params = c(alpha = .2, position = "jitter")))
这篇关于如何为离散值生成有意义的制图员/相关图的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!