`geom_hline` draws incomplete lines when used together with `coord_trans`, regardless of their respective order of addition. ```r mydf <- data.frame(x = 0L:20, y = -10:10) ggplot(data = mydf, aes(x, y)) + geom_point() + coord_trans(x = "log1p") + geom_hline(yintercept = c(-10, 10)) ``` 