如何添加一个覆盖整个数据而忽略分组的图?
How can I add a plot that covers the whole data ignoring grouping?
我有一个带有变量 delta2
的数据框,我将其剪切为 above and below 0.8
并为两个组绘制 var1 v/s var2
。但我还想添加 delta2 = -Inf,Inf
的案例,基本上包括整个数据集并比较相同的 var1 v/s var2
。我该如何继续?
sm$dclass <- cut(sm$d, breaks=c(-Inf, 0.8, Inf), labels=c("delta2 < 0.8 ","delta2 >= 0.8"))
ggplot(sm, aes(var1, var2)) +
facet_wrap(~ dclass) +
geom_point(aes(colour=factor(dclass))) +
stat_density_2d()+
scale_colour_discrete()
一种技术是将重新定义的数据添加到现有绘图中。例如:
library(ggplot2)
ggplot(mtcars, aes(disp, mpg, col=factor(cyl))) +
geom_point() +
stat_density_2d() +
geom_point(data=transform(mtcars, cyl="all")) +
stat_density_2d(data=transform(mtcars, cyl="all")) +
facet_wrap(~ cyl)
我有一个带有变量 delta2
的数据框,我将其剪切为 above and below 0.8
并为两个组绘制 var1 v/s var2
。但我还想添加 delta2 = -Inf,Inf
的案例,基本上包括整个数据集并比较相同的 var1 v/s var2
。我该如何继续?
sm$dclass <- cut(sm$d, breaks=c(-Inf, 0.8, Inf), labels=c("delta2 < 0.8 ","delta2 >= 0.8"))
ggplot(sm, aes(var1, var2)) +
facet_wrap(~ dclass) +
geom_point(aes(colour=factor(dclass))) +
stat_density_2d()+
scale_colour_discrete()
一种技术是将重新定义的数据添加到现有绘图中。例如:
library(ggplot2)
ggplot(mtcars, aes(disp, mpg, col=factor(cyl))) +
geom_point() +
stat_density_2d() +
geom_point(data=transform(mtcars, cyl="all")) +
stat_density_2d(data=transform(mtcars, cyl="all")) +
facet_wrap(~ cyl)