... legend.position="none") + geom_vline(xintercept = lubridate::ymd("2013-08-23"), linetype=1, colour="red", size = 0.5)+ sapply(point_dates[[1]], ...
確定! 回上一頁