将自定义文本插入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)