R——同一图表上的配对点图和箱线图：ggplot2 或其他包中是否有模板？

Question

我是 R 新用户，找到了我想用我的数据复制的图表。从绘图的外观来看，它看起来像是用 ggplot2 制作的。我搜索了又搜索，在 ggplot2 或其他包中找不到模板。只是想知道是否有人见过此模板代码？

请参阅此处所附的图片和论文：http://ehp.niehs.nih.gov/1205963/

Answer 1

也许这会让你开始：

d <- data.frame(y = rnorm(20, 9, 2),
                group = as.factor(rep(c('Post-FAP', 'Post-DEP'), each = 10)),
                id = rep(1:10, 2))

ggplot(d, aes(y = y)) +
  geom_boxplot(aes(x = rep(c(-3, 3), each = 10), group = group), fill = 'steelblue') +
  geom_point(aes(x = rep(c(-1, 1), each = 10)), size = 5) +
  geom_line(aes(x = rep(c(-1, 1), each = 10), group = id))