R语言for循环绘图：plot()正常但ggplot()出图异常问题

该问题不是R环境异常导致，完全是代码编写存在疏漏，核心问题有两处：

• ggplot采用非标准求值机制，循环中直接把存储列名的字符串变量i传入aes()时，不会自动映射到数据集对应列，只会将i识别为固定值，导致数据映射完全错乱
• 基础plot()函数传入分类x轴、连续y轴时会默认绘制箱线图，但你写的ggplot代码用了geom_col()（柱状图几何对象），图形类型选择错误，和预期输出不匹配

对应原循环逻辑的实现代码 #

和你原本base R循环逐图输出4张箱线图的逻辑完全一致，修正后代码如下：

library(ggplot2)
library(dplyr)

for (i in colnames(iris[-5])) {
  # 用.data[[i]]动态引用对应列，替换错误的直接传i的写法
  p <- iris %>% 
    ggplot(aes(x = Species, y = .data[[i]])) +
    geom_boxplot() + # 替换错用的geom_col，匹配箱线图输出
    labs(x = "Species", y = i) # 正确设置y轴标签为当前列名
  
  print(p) # 循环中必须显式调用print()才能输出ggplot对象
}

更符合ggplot习惯的非循环写法 #

ggplot更推荐先将宽格式数据转为长格式，通过分面一次性输出所有图，无需写循环：

library(ggplot2)
library(dplyr)
library(tidyr)

iris %>% 
  # 把4个测量列转成长格式
  pivot_longer(cols = -Species, names_to = "trait", values_to = "value") %>% 
  ggplot(aes(x = Species, y = value)) +
  geom_boxplot() +
  facet_wrap(~trait, scales = "free_y") # 按测量指标分面，y轴按指标自适应范围

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