ggplot2使用geom_point绘图时如何让x轴仅显示单个值50

针对你给出的order_dates全为50的数据集，以下三种方法均可去掉x轴默认生成的多余刻度，仅保留50作为唯一刻度：

• 方法1：手动指定连续轴的刻度与范围
  直接调用scale_x_continuous()，通过breaks参数明确指定要展示的刻度值，同时通过limits收紧x轴范围，避免ggplot自动拓展轴范围带出额外刻度，示例代码：

  library(ggplot2)
  # 构造示例数据集
  df <- data.frame(
    order_dates = rep(50, 6),
    `Sales in Dollars` = c(10, 15, 20, 30, 35, 45),
    check.names = FALSE
  )
  
  ggplot(df, aes(x = order_dates, y = `Sales in Dollars`)) +
    geom_point() +
    scale_x_continuous(
      breaks = 50, # 仅展示50这一个刻度
      limits = c(49.5, 50.5) # 按需微调范围，留出少量边距避免点贴在轴边缘即可
    )
  

  该方法灵活性最高，后续如果需要新增其他刻度，直接在breaks参数里追加值即可。

• 方法2：将x轴转换为离散标度
  由于你的x字段目前只有唯一取值，可以直接将order_dates转换为因子类型，让ggplot默认按离散变量处理坐标轴，离散轴默认只会展示数据中实际存在的类别值，自然只会显示50：

  ggplot(df, aes(x = as.factor(order_dates), y = `Sales in Dollars`)) +
    geom_point() +
    labs(x = "order_dates") # 修正x轴标题，避免显示转换函数名
  

  该方法代码最简洁，不需要手动计算轴范围，适合x轴取值少、不需要连续轴逻辑的场景。

• 方法3：调整连续轴拓展参数，取消默认范围拓展
  ggplot默认会给连续轴两端预留5%左右的拓展边距，这也是会出现50之前多余刻度的核心原因之一。你可以不手动设置limits，直接通过expand参数控制边距大小，配合手动指定的breaks实现效果：

  ggplot(df, aes(x = order_dates, y = `Sales in Dollars`)) +
    geom_point() +
    scale_x_continuous(
      breaks = 50,
      expand = expansion(mult = 0.05) # 仅保留5%的边距，不会拓展到能显示其他刻度的范围
    )
  

注意：如果后续加载了其他修改默认刻度的主题包，需要确认自定义的scale设置在主题加载之后，避免自定义刻度被覆盖。

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