r - 在 geom_boxplot(fill=group) 上覆盖 geom_points()？

Question

这是我目前的代码:

require(ggplot2)
value <- rnorm(40, mean = 10, sd = 1)
variable <- c(rep('A', 20), rep('B', 20))
group <- rep(c('Control', 'Disease'), 20)
data <- data.frame(value, variable, group)

ggplot(data, aes(x=variable, y=value)) +
  geom_boxplot(aes(fill=group)) +
  geom_point(aes())

这按照我想要的方式将箱线图按变量分组。但是，所有组的积分都是重叠的，我希望将其分成几组。我该怎么做呢？

Answer 1

使用 position_dodge()对于积分，还添加 group=group内aes()的 geom_point() .

ggplot(data, aes(x=variable, y=value)) +
  geom_boxplot(aes(fill=group)) +
  geom_point(position=position_dodge(width=0.75),aes(group=group))