如何使用R在时间序列图中输入天数？

install.packages("ggplot2")
install.packages("zoo")

library(ggplot2)
library(zoo)

# 创建示例数据
start_date <- as.Date("2022-01-01")  # 开始日期
num_days <- 30  # 总天数

df <- data.frame(
  date = seq(start_date, by = "1 day", length.out = num_days),
  value = runif(num_days)  # 随机生成数值
)

# 将日期列转换为Date对象
df$date <- as.Date(df$date)

# 创建时间序列对象
ts_data <- zoo(df$value, df$date)

# 绘制时间序列图
ggplot(df, aes(x = date, y = value)) +
  geom_line() +
  labs(x = "日期", y = "数值") +
  theme_minimal()