如何在ggplot中添加垂直线条的图例?

I am trying to show a line graph with some vertical lines as indicators of particular time points and have a legend labeling those time points. I am trying to show a line graph with some vert