ggplot X轴未显示全部年份求助：如何设置显示每一年

看起来你已经把温度数据处理得很到位了，只是X轴刻度默认没有显示每一年对吧？这是因为ggplot对连续型的年份变量，会自动优化刻度间隔，避免标签重叠。咱们只需要手动指定X轴的刻度断点和标签就行。

修改后的完整代码 #

library(dslabs)
library(tidyverse) # 建议加载tidyverse，包含ggplot2和dplyr等工具包，避免依赖问题
data(temp_carbon)

temp_carbon %>% 
  select(Year = year, Global = temp_anomaly, Land = land_anomaly, Ocean = ocean_anomaly) %>% 
  gather(Region, Temp_anomaly, Global:Ocean) %>% 
  ggplot(aes(Year, Temp_anomaly, col = Region)) + 
  geom_line(size = 1) + 
  geom_hline(aes(yintercept = 0), col = colorblind_palette[8], lty = 2) + 
  geom_label(aes(x = 2005, y = -.08), col = colorblind_palette[8],label = "20th century mean", size = 4) + 
  ylab("Temperature anomaly (degrees C)") + 
  xlim(c(1880, 2018)) + 
  scale_color_manual(values = colorblind_palette) + 
  # 关键：强制指定每个年份为X轴刻度断点
  scale_x_continuous(breaks = seq(1880, 2018, 1), 
                     labels = seq(1880, 2018, 1)) +
  # 旋转X轴标签，避免密集重叠
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1)) +
  ggtitle("Global, Land and Ocean Temperatures from 1880-2018")

关键修改点说明 #

• scale_x_continuous(breaks = seq(1880, 2018, 1), labels = seq(1880, 2018, 1))：用seq()生成1880到2018的所有整数年份，作为X轴的刻度断点和显示标签，强制让每一年都出现在X轴上。
• theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1))：因为年份数量较多，把X轴标签旋转90度，同时调整垂直和水平对齐方式，确保标签清晰不重叠。

如果之后觉得全显示年份太拥挤，也可以把seq()里的步长改成10（比如seq(1880,2018,10)），这样就只显示每10年的刻度，灵活调整就行～

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