ggplot2如何将X轴日期标签设置为Mon-yyyy格式？

要把X轴默认的2016-01格式改成你想要的Jan-2016，只需要在现有ggplot代码基础上添加scale_x_date()函数来定制日期标签即可，这里有两种简单实用的实现方式：

方法1：使用scales包（推荐的ggplot风格） #

scales包提供了专门的date_format()函数来处理日期标签，用法直观且贴合ggplot的语法逻辑：

library(ggplot2)
library(scales) # 记得加载这个辅助包

# 你的原始数据
data = data.frame(
  name=rep(c('Toyota', "Honda", "Nissan") ,each=4),
  date=c(rep(seq(as.Date("2016/1/1"), by = "month", length.out = 4),2),rep(seq(as.Date("2017/1/1"), by = "month", length.out = 4),1)),
  sales=sample(10:20, 12, replace=T)
)

# 绘制带自定义日期格式的折线图
ggplot(data, aes(x=date, y=sales)) + 
  geom_line(aes(color=name)) +
  scale_x_date(labels = date_format("%b-%Y"))

这里的%b代表月份的英文缩写（比如Jan、Feb），%Y代表4位年份，组合起来就精准实现了你要的Jan-2016格式。

方法2：直接用base R的strftime函数（无需额外包） #

如果你不想加载新的包，也可以用base R自带的strftime()函数来完成日期格式转换：

library(ggplot2)

# 你的原始数据
data = data.frame(
  name=rep(c('Toyota', "Honda", "Nissan") ,each=4),
  date=c(rep(seq(as.Date("2016/1/1"), by = "month", length.out = 4),2),rep(seq(as.Date("2017/1/1"), by = "month", length.out = 4),1)),
  sales=sample(10:20, 12, replace=T)
)

ggplot(data, aes(x=date, y=sales)) + 
  geom_line(aes(color=name)) +
  scale_x_date(labels = function(x) strftime(x, "%b-%Y"))

额外小技巧 #

• 如果想要月份的全称（比如January-2016），把格式符换成%B-%Y即可；
• 如果想用2位年份（比如Jan-16），可以调整为%b-%y。

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