ggplot和ggrepel：在三个图中标记峰值

我试图在与

ggplot

放在一起的三个图中标记这四个峰值的

m/z

值

下面是一个例子，中间标记的峰。

这是我的密码

ggplot (data = middle.data.frame, aes(x= mz, y= relative.intensity, label=mz, col="blue")) +
  geom_line() +
  geom_text_repel(data = middle.data.frame.top.peak,
                   aes(x=ms,y= relative.intensity),
                   nudge_x =22, nudge_y = 20) +
  geom_line(data =bottom.data.frame, aes(x= mz, y=relative.intensity-110, col="red")) +
    # geom_text_repel(data = bottom.data.frame.top.peak, nudge_x =22, nudge_y = 20) +
  geom_line(data = top.data.frame, aes(x=mz, y=relative.intensity+110, col="cyan")) +
  # geom_text_repel(data = top.data.frame.top.peak, nudge_x =22, nudge_y = 20) +
  theme_classic() +
  theme(axis.title=element_text(size=15),
        axis.text=element_text(size=15),
        axis.line.y = element_blank(),
        axis.text.y = element_blank(),
        axis.ticks.y = element_blank(),
        axis.title.y = element_blank()) +
  labs(x = "m/z")

当我试图用上面的代码来标记中间和底部图中的峰值时（不加注释这些代码），我得到下面的曲线图。

有人知道如何解决这个问题吗？而且，颜色似乎与我在代码中指定的颜色不匹配。e、 我想把中间的图涂成蓝色，但它是红色的。有没有办法把这些颜色改成我喜欢的颜色

谢谢你的帮助