当图形中有多个绘图而不影响其他绘图时，R ggplot反转绘图的一个轴

我使用ggplot2绘制了一个降雨数据集。我必须在我用这个做的相同的图表中绘制降雨和河流落差数据

p <- ggplot(data=raw_data, aes(x=Hr, y=RF)) +
  geom_bar(stat="identity") 

p <- p + geom_line(aes(x= Hr, y=SF))

p试试这个

require(ggplot2)

df1 <- data.frame(x=c(1,2), y=c(3,4))
dfdummy <- data.frame(xx=c(1,2), yy=c(5,5))

 # here the arbitrary hang height is 5, see yy.

ggplot() +
  geom_bar(data=dfdummy, aes(x=xx, y=yy), stat="identity") + # dummy bars
  geom_bar(data=df1, aes(x=x, y=y), stat="identity", fill="white") + # overwriting dummy
  theme_classic() # theme w/o grid lines and background matching fill means invisible data

require（ggplot2）
df1在要向下填充的条形图中，设置
y=-SF
。您的意思是希望条形图从某个任意高的值向下填充到实际值吗？或者，正如@gregor的评论，您希望它从零向下挂起到负值？我假设这里所有的值都是正的？@geryan所有的值都是正的。我想在同一个y轴上向下填充图形。你不能优雅地完成它——这是非标准的。您可以尝试为每个x值创建一个y值相等的虚拟数据集，然后绘制它们，然后在顶部以与背景相同的颜色绘制真实值。通过一些调整应该是可行的谢谢你的时间：）