如何在ggplot2分面图中为指定子图设置百分比X轴刻度？

完全可以实现，借助ggh4x包提供的facetted_pos_scales()函数，就能为指定分面单独设置坐标轴刻度格式，其余分面保留默认样式。

以下是完整的可复现代码：

# 加载所需包
library(ggplot2)
library(ggh4x)
library(scales)
library(dplyr)

# 构造示例数据：包含2个百分比指标（x范围0-1）和2个常规数值指标
set.seed(123)
data <- tibble(
  indicator = rep(c("百分比指标1", "百分比指标2", "常规指标1", "常规指标2"), each = 50),
  x = c(runif(100), rnorm(100, mean = 50, sd = 10)),
  y = rnorm(200)
)

# 绘制分面图并设置个性化x轴刻度
ggplot(data, aes(x = x, y = y)) +
  geom_point(alpha = 0.6) +
  facet_wrap(~indicator, ncol = 2) +
  # 为指定分面设置百分比刻度
  facetted_pos_scales(
    x = list(
      # 匹配百分比指标的分面，应用百分比标签
      indicator %in% c("百分比指标1", "百分比指标2") ~ scale_x_continuous(labels = percent),
      # 其余分面使用默认刻度
      TRUE ~ scale_x_continuous()
    )
  ) +
  theme_bw()

代码说明 #

• facetted_pos_scales()的x参数接受一个列表，通过逻辑条件匹配目标分面，为其单独配置scale_x_continuous()；
• scales::percent()负责将0-1的数值转换为百分比格式（如0.5显示为50%）；
• 未匹配的分面会使用TRUE ~ scale_x_continuous()的默认设置，保留原有数值刻度。

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