如何在R语言数据框中动态创建新列？解决‘sl未找到’报错

你碰到的这个错误原因很明确：在dat[, ...]的索引操作里，你给列定义的别名（比如sl='Sepal.Length'）并没有在当前R环境中创建对应的变量——这个别名只是你给输出列指定的名字，R并不会把它当成可以直接引用的对象来用。另外代码里还有个小笔误：pl/si里的si应该是sl吧？这也是需要修正的点。

下面给你几种简洁的解决方案：

方法1：用基础R的transform()函数 #

transform()是基础R专门为数据框添加/修改列设计的工具，它会自动在数据框的上下文里识别列名，刚定义的新列也能直接在后续计算中使用：

dat <- iris[,c('Sepal.Length','Petal.Length')]

dat2 <- transform(dat,
                  sl = Sepal.Length,
                  pl = Petal.Length,
                  slpl = sl * pl,
                  plsl = pl / sl)

方法2：用tidyverse的dplyr::mutate()（更灵活的链式风格） #

如果你习惯tidyverse的语法，mutate()是更强大的选择，它支持连续的列操作，而且刚创建的列可以直接在后续步骤中引用：

library(dplyr)

# 先筛选需要的列
dat <- iris %>% select(Sepal.Length, Petal.Length)

# 创建新列
dat2 <- dat %>%
  mutate(sl = Sepal.Length,
         pl = Petal.Length,
         slpl = sl * pl,
         plsl = pl / sl)

方法3：基础R手动赋值（理解原理用，不推荐日常使用） #

如果你一定要用类似原始思路的写法，得先把需要的列提取到当前环境中定义变量，再构建新数据框：

dat <- iris[,c('Sepal.Length','Petal.Length')]

# 先把列赋值为环境中的变量
sl <- dat$Sepal.Length
pl <- dat$Petal.Length

# 构建新数据框
dat2 <- data.frame(sl = sl,
                   pl = pl,
                   slpl = sl*pl,
                   plsl = pl/sl)

不过这种方法不够简洁，还会额外占用内存，所以更推荐前两种方法。

总的来说，核心就是要让R在数据框的上下文里处理新列的定义和计算，transform()和mutate()都帮你做好了这一点，不用手动去管理变量环境~

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