R 如何设置条形图的y轴+；点绘图是否介于2个非零负数之间？

尝试使条形图的y轴从-50（底部）变为-25（顶部）。基本上是做协调笛卡尔（）然后缩放y逆（），但这不起作用。它只会给我从底部的-25到顶部的-50

如果我做了

scale\u y\u reverse（limits=c（-50，-25））

我得到以下结果：

我也尝试过使用

ylim

，但它使绘图没有条

ggplot（平均阈值、不良事件（名称、平均值））+
几何图形颜色（宽度=0.3，填充=“灰色60”，颜色=“黑色”）+
几何点（数据=AP\U阈值，位置=position\U微移（x=-0.1））+
坐标笛卡尔（ylim=c（-50，-25））
ggplot（平均阈值、不良事件（名称、平均值））+
几何图形颜色（宽度=0.3，填充=“灰色60”，颜色=“黑色”）+
几何误差条（aes（ymin=平均值-sd，ymax=平均值+sd，宽度=0.1））+
几何点（数据=AP\U阈值，位置=position\U微移（x=-0.1））+
ylim（-50，-25）

这是一个我正在努力实现的例子

这就是我的代码所做的

伪造数据：

AP_threshold <- data.frame(
  name = LETTERS[1:2],
  value = rnorm(10, mean = -30, sd = 10)
)

伪造数据：

AP_threshold <- data.frame(
  name = LETTERS[1:2],
  value = rnorm(10, mean = -30, sd = 10)
)

---

你是说你希望你的酒吧的底线是-50，然后上升到-25？在前面的问题中有一些解决方法，比如这个问题：如果你的问题不同，请画一张图片或在问题的主体部分添加一些说明。我在我的帖子中添加了一个图片（在链接中）。老实说，我对R很陌生，所以我的代码肯定效率很低。这可能是我加载数据的方式有问题-您提供的链接中的解决方案不正常。您想做什么？我不明白你的代码的结果与你想要的有什么不同。使用这段代码添加了另一个图像：scale_y_reverse（）+coord_cartesian（ylim=c（-50，-25）），y轴从-25到-50，而不是-50到-25，你是说你希望你的条形图的基线为-50，并上升到-25？在前面的问题中有一些解决方法，比如这个问题：如果你的问题不同，请画一张图片或在问题的主体部分添加一些说明。我在我的帖子中添加了一个图片（在链接中）。老实说，我对R很陌生，所以我的代码肯定效率很低。这可能是我加载数据的方式有问题-您提供的链接中的解决方案不正常。您想做什么？我不明白你的代码的结果与你想要的有什么不同。使用这段代码添加了另一个图像：scale_y_reverse（）+coord_cartesian（ylim=c（-50，-25））y轴从-25到-50，而不是-50到-25。我有一组数据，它们应该组成1条。ie来自一组样本的数据，其中geom_条是点的平均值，geom_点是每个样本的原始数据。最终的输出应该是1条，上面有一堆点。更新后可以扩展到对每一层应用相同的逻辑。我有一组数据，应该组成1条。ie来自一组样本的数据，其中geom_条是点的平均值，geom_点是每个样本的原始数据。最终的输出应该是1条，上面有一堆点。更新为扩展以将相同的逻辑应用于每一层。

library(dplyr)
avg_AP_threshold <- AP_threshold %>%
  group_by(name) %>%
  summarize(average = mean(value),
            sd = sd(value))

negative_shift = 50
ggplot(avg_AP_threshold, aes(name, average + negative_shift)) +
  geom_col(width = 0.3, fill = "grey60", color = "black") +
  geom_point(data = AP_threshold, 
             aes(y = value + negative_shift),
             position = position_nudge(x = -0.1)) +
  geom_errorbar(aes(ymin = average - sd + negative_shift, 
                    ymax = average + sd + negative_shift), width = 0.1) +
  scale_y_continuous(labels = function(y) y - negative_shift)