R: 分组箱图加散点

记录作图代码，尤其是箱图匹配散点的参数position_jitterdodge。

ggplot(input, aes(x=Site, y=Fungi, color = Layer)) + # 逐个修改
  geom_boxplot(width = 0.8,
               size = 1,
               outlier.colour = NA) +
  geom_jitter(size = 1, 
              position = position_jitterdodge(jitter.width = 0.2,
                                              dodge.width = 0.8)) +
  theme_classic() +
  labs(x="", y="Numbers of species", color="Layer", title="Fungi") +
  # 逐个修改
  theme(title = element_text(size = 15, face="bold")) +
  theme(axis.title = element_text(size = 25),
        axis.text.y = element_text(size = 18),
        axis.text.x = element_text(size = 20),
        axis.line = element_line(size = 1),
        axis.ticks = element_line(size = 1))