вертикальная линия ggplot с осью даты

Question

У меня возникают проблемы с добавлением вертикальной линии на график, когда ось X является объектом даты-времени (POSIXct). Кажется, всегда хочется поставить черту в эпоху. Вот пример:

df <- data.frame(x=ymd('2011-01-01')+hours(0:24), y=runif(25))
ggplot(df, aes(x=x,y=y)) + geom_point()

Теперь я пытаюсь добавить строку в третий раз наблюдения:

ggplot(df, aes(x=x,y=y)) + geom_point() + geom_vline(aes(x=df$x[3]))

Что-то я не так делаю?

Answer 1

Попробуйте сделать это вместо:

geom_vline(xintercept = df$x[3])

Answer 2

ggplot(df, aes(x=x,y=y)) + geom_point() + geom_vline(aes(xintercept=df$x[3]))

вы хотите xintercept вместо x в вашем geom_vline aes.