如何在 r 中的 plot 每周时间序列数据在 r 或 ggplot 中的 x 轴上显示日期？

Question

I have time series data set

y<-c(1,5,12,21,30,50,90,100)

Date = c("2020/07/16","2020/07/23","2020/07/30","2020/08/06","2020/08/13","2020/08/20","2020/08/27","2020/09/13")

if I have an other time series

 q<-c(1,13,18,18,20,30,40,50)

how can I plot it in the same plot?

how to plot this data set show the date on the x-axis? Thanks

Answer 1

Convert Date to Date class and then add these 2 vectors in a dataframe to use in ggplot .

library(ggplot2)
df <- data.frame(y, Date = as.Date(Date))
ggplot(df) + aes(Date, y) + geom_line()

---

For multiple values you could get the data in long format and then plot.

df <- data.frame(y, Date = as.Date(Date), q)
df %>%
  tidyr::pivot_longer(cols = -Date) %>%
  ggplot() + aes(Date, value, color = name) + geom_line()