带日期轴的ggplot垂直线

Question

I'm having some trouble adding a vertical line to a plot when the x-axis is a datetime ( POSIXct ) object. It seems to always want to put the line at the Epoch. Here's an example:

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

Now I try to add a line at the third observation time:

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

Something I'm doing wrong?

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]))

您需要在geom_vline aes xintercept而不是x 。