R 向ggplot2中的散点图添加水平线

从此以后

给我我所需要的

我想做的是在散点图上绘制，水平线等于我计算的速率之一。而不是手动添加

我想这可能有用

DATA%>%filter(DISEASE== "Chicky Pox")%>%
  ggplot(aes(x=AREA, y=rate)) +geom_point() +
  geom_hline(yintercept=20, linetype="dashed", color = "red")

确实如此。 它在20点给我一条线。 但是我怎么能让它给我一条线，等于面积a的速率值（例如）。 通过这种方式，您可以快速看到哪些比率高于或低于A的比率

---

再说一遍。抱歉，这很简单。但是已经晚了…

您可以在

aes（）

中设置一些简单的子集条件，这意味着只要条件不太复杂，这是非常简单的：

DATA %>%
    filter(DISEASE== "Chicky Pox") %>%
    ggplot(aes(x=AREA, y=rate)) +
    geom_point() +
    geom_hline(aes(yintercept=rate[AREA == "A"]), 
               linetype="dashed", color = "red")

---

再次感谢！这是另一个“当头棒喝”的时刻。

DATA %>%
    filter(DISEASE== "Chicky Pox") %>%
    ggplot(aes(x=AREA, y=rate)) +
    geom_point() +
    geom_hline(aes(yintercept=rate[AREA == "A"]), 
               linetype="dashed", color = "red")