如何在ggplots中将日期间隔设置为每月1号

data$date <- as.Date(data$date)

p <- ggplot(data, aes(x = date, y = value))

p + scale_x_date(breaks = "1 month", date_labels = "%Y-%m-%d")

library(ggplot2)

# 将日期数据转换为日期格式
data$date <- as.Date(data$date)

# 创建绘图对象
p <- ggplot(data, aes(x = date, y = value))

# 设置日期间隔为每月1号
p + scale_x_date(breaks = "1 month", date_labels = "%Y-%m-%d")