r - 将自定义文本插入到ggplot2

Question

我有一个ggplot图表，我想将自定义字符串插入0之下，作为“内部”，将0之上，作为“超出”。

我正在这样做:

ggplot(z, aes(Date, Breach1/60, group=Jobs, label=c("Within SLA", "Breached SLA"))) + 
 geom_line(size=1) + 
 theme_bw() + ylab("Hours") + xlab("Date") + opts(title="Jobs") + 
 geom_hline(yintercept=0, color="red", size=2) + geom_text(hjust=0, vjust=3)

这似乎使文本无处不在。我喜欢在零上方放置一个文本，在零值下方放置一个文本。有任何想法吗？

Answer 1

您正在注释:

ggplot(z, aes(Date, Breach1/60, group=Jobs)) + 
 geom_line(size=1) + 
 theme_bw() + ylab("Hours") + xlab("Date") + opts(title="Jobs") + 
 geom_hline(yintercept=0, color="red", size=2) + 
 annotate("text", label = "Within SLA", x = 1, y = 2) +
 annotate("text", label = "Breached", x = 1, y = -2)