如何在R中正确排序日期并解决柱状图仅显示月份的问题

1. 转换日期格式 #

你的Date列大概率是字符/因子类型，导致ggplot无法识别为日期进行排序和完整显示。先将其转为日期类型：

# 若Date格式为"2020-05-01"，直接用as.Date转换
d$Date <- as.Date(d$Date)
# 若格式是"2020年5月1日"这类中文格式，需指定格式参数
# d$Date <- as.Date(d$Date, format = "%Y年%m月%d日")

2. 修改ggplot代码，控制日期显示与排序 #

在原代码中添加scale_x_date，指定x轴日期的显示格式和刻度间隔，同时确保日期按时间顺序排列：

ggplot(data = d, mapping = aes(x = Date, y = Proportion)) +
  geom_col() + 
  facet_grid(rows=vars(Group)) + 
  labs(x = "Date", y = "Read proportion (%)") + 
  theme_light() +
  # 设置日期显示格式为"YYYY年MM月DD日"，刻度间隔为1天
  scale_x_date(date_labels = "%Y年%m月%d日", date_breaks = "1 day") +
  theme(axis.text.x = element_text(colour = "grey20", 
                                   size = 6, angle = 45, 
                                   hjust = 1, vjust = 1),  # 调整位置避免标签重叠
        axis.text.y = element_text(colour = "grey20", size = 6),
        text = element_text(size = 8))

• date_labels：自定义日期显示格式，%Y代表4位年份，%m代表2位月份，%d代表2位日期，可按需调整。
• date_breaks：设置x轴刻度间隔，比如日期间隔不是每天，可改为"2 days"或"1 week"。
• 移除了原代码中多余的group=1，x轴为日期类型时ggplot会自动处理分组逻辑。

内容的提问来源于stack exchange，提问作者R-ookie