如何在ggplot2中控制箱线图的x位置?

时间:2013-01-25 19:05:28

标签: r ggplot2

首先,设置阶段的快速示例:

set.seed(123)
dat <- data.frame( 
  x=rep( c(1, 2, 4, 7), times=25 ), 
  y=rnorm(100), 
  gp=rep(1:2, each=50) 
)

p <- ggplot(dat, aes(x=factor(x), y=y))
p + geom_boxplot(aes(fill = factor(gp)))

我想制作一个类似的情节,除了控制每组箱图的x位置。我的第一个猜测是使用非因子x美学来控制沿着这些箱形图的x轴的位置。然而,一旦我尝试这样做,似乎geom_boxplot并没有像我希望的那样解释美学。

p + geom_boxplot( aes(x=x, y=y, fill=factor(gp)) )

特别是,当geom_boxplot非因素时,x似乎以某种方式崩溃了所有x值。

有没有办法用ggplot2控制箱形图的{{1}}位置?要么通过指定每个级别的因子美学之间的距离,更巧妙地使用非要素美学,还是其他?

2 个答案:

答案 0 :(得分:5)

您可以使用scale_x_discrete()设置x轴的位置(刻度)。

p <- ggplot(dat, aes(x=factor(x), y=y))
p + geom_boxplot(aes(fill = factor(gp))) + 
    scale_x_discrete(limits=1:7)

答案 1 :(得分:5)

您也可以使用group美学来完成此操作。但是,我不确定为什么你不能将x传递给group。这不起作用:

ggplot() + 
  geom_boxplot(data=dat, aes(x=x, y=y, fill=factor(gp), group=x))

但这样做:

ggplot() + 
  geom_boxplot(data=dat, aes(x=x, y=y, fill=factor(gp), group=paste(x, gp)))