如何用POSIXct设置ggplot2横轴刻度为每月首日且不含年份？

要实现刻度标签显示每月第一天且不含年份，你可以通过手动指定刻度位置+自定义标签格式来搞定，下面是完整的可复现代码和说明：

完整代码（推荐用lubridate简化操作） #

library(ggplot2)
library(scales)
library(dplyr)
library(tibble)
library(lubridate) # 用于便捷处理日期

mydata <- read.table(header = TRUE, text = "
            dates values
            2022-12-03 5
            2023-03-02 0
            ")

plottib <- tibble(mydata) %>% 
  mutate(dates = as.POSIXct(dates, format="%Y-%m-%d"))  

# 生成所有需要显示的每月第一天刻度
start_month <- floor_date(min(plottib$dates), "month") # 数据起始日期所在月的第一天
end_month <- ceiling_date(max(plottib$dates), "month") # 数据结束日期所在月的下一月第一天
month_starts <- seq(start_month, end_month, by = "1 month")

gp <- ggplot(plottib, aes(x=dates, y=values)) +
  geom_point() +
  labs(title = paste("From", min(mydata$dates), 'to', max(mydata$dates), sep=' ')) +
  scale_x_datetime(
    breaks = month_starts, # 指定刻度为每月第一天
    labels = date_format("%d %b") # 标签格式：日+月份缩写，不带年份
  )

gp

替代方案（无需额外加载lubridate） #

如果不想用lubridate，可以用基础R的日期函数生成刻度：

library(ggplot2)
library(scales)
library(dplyr)
library(tibble)

mydata <- read.table(header = TRUE, text = "
            dates values
            2022-12-03 5
            2023-03-02 0
            ")

plottib <- tibble(mydata) %>% 
  mutate(dates = as.POSIXct(dates, format="%Y-%m-%d"))  

# 基础R方式生成每月第一天刻度
start_date <- as.Date(min(plottib$dates))
end_date <- as.Date(max(plottib$dates))

# 构造起始月份第一天
start_month_first <- as.Date(paste0(format(start_date, "%Y-%m"), "-01"))
# 构造结束月份的下一月第一天（确保覆盖最后一个数据点所在月）
end_month_first <- as.Date(paste0(format(end_date + months(1), "%Y-%m"), "-01"))
# 转换为POSIXct类型匹配数据格式
month_starts <- as.POSIXct(seq(start_month_first, end_month_first, by = "1 month"))

gp <- ggplot(plottib, aes(x=dates, y=values)) +
  geom_point() +
  labs(title = paste("From", min(mydata$dates), 'to', max(mydata$dates), sep=' ')) +
  scale_x_datetime(
    breaks = month_starts,
    labels = date_format("%d %b")
  )

gp

关键逻辑说明 #

• 刻度位置精准控制：不管用lubridate还是基础R，核心都是先生成所有需要显示的「每月第一天」日期序列，再把这个序列传给scale_x_datetime的breaks参数，确保刻度点正好落在每月首日。
• 标签格式自定义：date_format("%d %b")会将日期格式化为类似「01 Dec」「01 Jan」的形式，完全去掉年份信息，和标题里的年份形成呼应，避免重复。

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