使用ggplot2平滑自动关联的时间序列数据

# 导入所需的库
library(ggplot2)
library(dplyr)

# 创建一个模拟的时间序列数据集
data <- data.frame(
  date = seq(as.Date("2021-01-01"), by = "month", length.out = 12),
  value = c(10, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 65)
)

# 使用ggplot2创建一个平滑的时间序列图表
ggplot(data, aes(x = date, y = value)) +
  geom_smooth(method = "auto", se = FALSE, color = "blue") +
  theme_minimal() +
  labs(title = "自动关联的时间序列数据", x = "日期", y = "值")