如何将婚姻状态计数设为ggplot的X轴？（基于completejourney数据集）

1. 判断当前X轴的统计依据 #

默认情况下，ggplot2的geom_bar()函数如果未指定stat参数，会自动使用stat="count"，也就是统计每个分组（此处为「收入层级+婚姻状态」的组合）的样本数量，所以你当前的X轴应该就是对应婚姻状态的计数。

如果想要更明确地控制统计逻辑，也可以提前用dplyr统计好计数，再用geom_col()绘图：

library(dplyr)
library(ggplot2)

# 提前统计65岁以上人群的收入-婚姻状态计数
count_data <- completejourney %>%
  filter(age >= 65) %>%
  group_by(income, marital_status) %>%
  summarise(count = n(), .groups = "drop")

# 基于统计好的数据绘图
ggplot(count_data, aes(x = count, y = marital_status)) +
  geom_col() +
  facet_wrap(~income)

2. 设置X轴刻度为1、2……的连续序列 #

确认X轴为计数后，直接用scale_x_continuous()函数指定刻度即可，有两种常用方式：

方法1：自动适配数据中的最大计数 #

先提取数据里的最大计数值，再生成对应整数序列：

# 假设你的原绘图对象是p
max_count <- max(count_data$count) # 从提前统计好的数据中提取最大值

p + scale_x_continuous(
  breaks = seq(1, max_count, 1), # 生成1到max_count的连续整数刻度
  limits = c(0, max_count) # 可选：限制X轴范围从0到最大计数，避免刻度溢出
)

方法2：手动指定刻度范围 #

如果已知计数不会超过某个数值（比如20），可以直接写死刻度范围：

p + scale_x_continuous(breaks = seq(1, 20, 1))

这样就能让X轴显示1、2、3……的连续整数刻度了。

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