add the horizontal lines

[lchahua]

I am trying to add the horizontal lines like the original quantile regression plot

rq(IGBVL~COBRE+EPU+ORO+PETROLEO+S.P+VIX,tau=c(0.05, 0.10,0.25,0.50,0.75,0.90,0.95))%>%
broom::tidy(se.type = "boot") %>%
filter(!grepl("factor", term)) %>%
ggplot(aes(x=tau,y=estimate))+
geom_line(color="#00722e", size = 1)+
scale_x_continuous("",breaks=c(0.05,0.25,0.50,0.75,0.95))+
facet_wrap(~term, scales="free", ncol=2) +
geom_ribbon(aes(ymin=conf.low,ymax=conf.high),alpha=0.5, fill="darkgray")+
theme_minimal()

I am trying to plot like the next picture

[andresrcs]

You can use the annotate() function with geom "hline"

If you need more specific help, please provide a proper REPRoducible EXample (reprex) illustrating your issue.