ggplot2显示重复X轴刻度标签问题：X轴标签不显示如何解决？

问题原因 #

你当前代码的核心问题是：x = df$Index 是连续数值变量，但你使用了针对离散变量的 scale_x_discrete，二者类型不匹配，导致X轴标签无法正常渲染。

解决方案 #

要保留Time列的重复值和原有顺序，正确的做法是将Index转换为因子型变量，让ggplot将其视为离散类别，同时指定对应的标签为Time列的值。

修改后的完整代码

library(tibble)
library(ggplot2)

df <- tibble(
  Time = c('J-17', 'J', 'A', 'S', 'O', 'N', 'D', 'J-18', 'F', 'M', 'A', 'M', 'J', 'J', 'A', 'S', 'O', 'N', 'D', 'J-19', 'F'),
  Measurement = c(6.8, 6.7, 6.86, 6.63, 6.86, 7.61, 6.99, 7.48, 6.96, 7.22, 7.27, 7.19, 7.58, 7.46, 6.6, 6.97, 7.05, 7.41, 7.91, 6.38, 6.69)
)

# 将Index转为因子，强制维持原数据顺序
df$Index <- factor(1:nrow(df), levels = 1:nrow(df))

ggplot(df, aes(x = Index, y = Measurement)) +
  geom_hline(yintercept = mean(df$Measurement)) +
  geom_line(group = 1) +  # 因子变量需指定group确保连线连续
  geom_point() +
  scale_x_discrete(expand = c(0, 0), labels = df$Time) +
  theme_classic()

关键说明

• 把Index转为因子时，通过levels = 1:nrow(df)强制锁定原数据的顺序，避免因子自动按数值排序打乱时序。
• 由于x轴是因子类型，geom_line必须添加group = 1参数，告诉ggplot将所有点视为同一组进行连线（否则因子变量会被默认按分组处理，无法连成完整曲线）。
• scale_x_discrete的labels参数此时可正确映射每个因子水平到对应的Time值，包括重复的标签内容。

另一种简化思路（直接使用Time作为x轴） #

如果不想依赖Index，也可以直接将Time转为因子并指定顺序：

df$Time <- factor(df$Time, levels = df$Time)

ggplot(df, aes(x = Time, y = Measurement)) +
  geom_hline(yintercept = mean(df$Measurement)) +
  geom_line(group = 1) +
  geom_point() +
  scale_x_discrete(expand = c(0, 0)) +
  theme_classic()

这种方法更直接，同样能保留Time的重复值和原有顺序，因为因子的levels是按原数据的顺序设置的。

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