R中按分类变量分面绘制箱线图异常：箱线图显示为线条

你遇到的箱线图缩成线条的问题，核心原因是ggplot的美学映射（aes）搞反了x和y变量的对应关系。

问题根源 #

箱线图的本质是展示分类分组下连续变量的分布：需要把连续数值变量（这里是Measure）放在y轴，用来呈现数据分布的高低；把分组分类变量（这里是Jet_Lag_boolean）放在x轴，用来区分不同组的分布差异。

你当前的代码把只有0/1两个水平的分类变量Jet_Lag_boolean放在了y轴，连续变量Measure放在x轴，再加上coord_flip()翻转坐标轴，直接导致每个分组的箱线图被极度压缩，最终看起来只剩一条线。

修正后的代码 #

library(ggplot2)

# 你的可复现数据集
Data <- data.frame( 
  Measure = sample(0:999), 
  Jet_Lag_boolean = sample(c("1", "0"), 1000, replace = TRUE), 
  Offensive_Statistic = sample(c('OPA', 'OA', 'SLG'), 1000, replace = TRUE) 
)

# 修正后的绘图代码
ggplot(data = Data, aes(x = Jet_Lag_boolean, y = Measure)) +
  geom_boxplot() +
  facet_wrap(~ Offensive_Statistic, scales = "free_y") +
  theme_bw() +
  xlab("Jet Lag (0 = No, 1 = Yes)") +
  ylab("Measurement Value") +
  coord_flip() # 若偏好横向箱线图则保留，不需要可直接删除

代码调整说明 #

1. 修正核心映射：把x轴设为分组变量Jet_Lag_boolean，y轴设为连续变量Measure，完全贴合箱线图的展示逻辑。
2. 优化标签可读性：调整了坐标轴标签的描述，让图表含义更直观（你可以根据实际需求修改）。
3. 灵活的坐标轴翻转：保留coord_flip()会得到横向箱线图，删除则得到纵向箱线图，两种方式都能正常显示完整的箱线结构。

运行这段代码后，每个Offensive_Statistic子图里都会出现两个清晰的箱线图，分别对应Jet_Lag_boolean为0和1的Measure分布，不会再出现线条的问题。

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