ggplot2绘制时间序列图X轴日期过密及geom_smooth不显示问题求助

根本原因 #

你遇到的两个问题核心诱因是date字段在CSV读取时被默认解析为字符串/因子类型，未转换为R可识别的日期格式：

• X轴无法按时间维度自动划分合理刻度，只能将所有字符串值逐一渲染，导致显示拥挤杂乱
• ggplot将x轴识别为离散分类变量，无法基于连续维度计算拟合曲线，因此geom_smooth()无输出

修复代码 #

library(ggplot2)
library(dplyr)
chicago <- read.csv(file = 'FilePath')

chicago2 <- chicago %>%
  # 转换日期格式，若出现NA可根据原始日期格式调整format参数，如月/日/年对应format = "%m/%d/%Y"
  mutate(date = as.Date(date)) %>%
  filter(date >= "1997-01-01" & date <= "2000-12-31")
  
ggplot(chicago2, aes(x=date, y=temp)) +
  geom_point(alpha = 0.3) + # 调整透明度避免散点重叠
  geom_smooth(method = "loess", se = TRUE) + # 明确指定拟合方法，se参数控制是否显示置信区间
  labs(title="1997-2000年芝加哥气温变化趋势", x = "日期", y = "气温") +
  # 调整X轴刻度间隔，可修改为"1 year"按年显示更简洁
  scale_x_date(date_breaks = "6 months", date_labels = "%Y-%m") +
  # 旋转X轴标签避免文字重叠
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

可选调整说明 #

• 若想要更简洁的X轴刻度，可将scale_x_date的date_breaks参数修改为"1 year"，仅展示每年的刻度
• 若不需要平滑线的置信区间阴影，可将geom_smooth的se参数设置为FALSE
• 若数据量较大拟合速度慢，可将method参数修改为"gam"提升拟合效率

内容的提问来源于stack exchange，提问作者Lior133