如何在ggplot2中使用scale_y_sqrt时保持自由刻度并按需限制范围

要实现仅对hwy最大值超过40的分组限制y轴上限为30，其余分组保持自由刻度的需求，不能直接用全局的scale_y_sqrt(limits)（会统一限制所有面板），可以借助ggh4x包的facetted_pos_scales函数，为不同面板单独配置y轴刻度：

步骤1：安装并加载必要包 #

install.packages("ggh4x")
library(ggplot2)
library(ggh4x)

步骤2：编写绘图代码 #

# 先计算每个class的hwy最大值，确定需要调整的分组
hwy_max <- aggregate(hwy ~ class, data = mpg, max)

# 绘制分面板散点图
ggplot(mpg, aes(displ, hwy)) +
  geom_point() +
  facet_wrap(vars(class), scales = "free_y") +
  scale_y_sqrt(limits = c(12, NA)) + # 统一设置y轴下限，上限留空由面板自动计算
  facetted_pos_scales(
    y = list(
      # 对hwy最大值超过40的面板（如subcompact）设置上限为30
      class == "subcompact" ~ scale_y_sqrt(limits = c(12, 30)),
      # 其余面板保持默认的自由刻度逻辑
      ~ scale_y_sqrt(limits = c(12, NA))
    )
  )

代码说明 #

• 先通过aggregate统计每个class的hwy最大值，精准定位需要调整的分组；
• facet_wrap设置scales="free_y"保证各面板y轴刻度独立计算；
• facetted_pos_scales实现对指定面板单独配置y轴范围，既满足特殊分组的限制需求，又不影响其他分组的自由刻度；
• 统一设置y轴下限为12，确保所有面板的起始刻度一致。

如果不想额外安装包，也可以通过预处理数据手动指定各面板范围，但ggh4x的方法更简洁易维护。

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