geom_abline linha vertical

p + geom_vline(xintercept = 5)
Rocku0