position_dodge 和 nudge_y 一起

Question

我正在尝试使用 ggplot2 function 在条形图上方添加标签（字母）geom_text。我的条形图是分开使用的position=position_dodge()，因此我需要对新标签应用相同的内容。不过，我还想用它来nudge_y将标签与栏分开。如果我尝试同时使用这两个选项，R 会抱怨我只能使用其中一个选项。我想做这样的事情：

Tukey.labels <- geom_text(data=stats,
                    aes(x=factor(Treatment2), y=x.mean, 
                        label=Tukey.dif),
                    size=4, nudge_y=3,            # move letters in Y
                    position=position_dodge(0.5)) # move letters in X

要创建像这样的图像有人知道有可能在position_dodge同时进行时将我的所有标签在 Y 方向上移动相同的距离吗？我在其他帖子中找不到这个问题的答案

Answer 1

如果没有可重现的示例，很难排除故障。希望这有帮助：

library(dplyr); library(ggplot2)
ggplot(mtcars %>% rownames_to_column("car") , 
       aes(as.factor(cyl), mpg, group = car)) + 
  geom_col(position = position_dodge(0.9)) +
  geom_errorbar(aes(ymin = mpg - wt,
                    ymax = mpg + wt),
                position = position_dodge(0.9)) +
  geom_text(aes(label = gear, y = mpg + wt), vjust = -0.5,
            position = position_dodge(0.9))