如何根据另一列的某些条件在 R 数据框中创建新列?
r programmingserver side programmingprogramming更新于 2025/4/11 12:52:17
有时我们想要更改一列或通过使用 R 中数据框的其他列来创建新列，这在我们想要创建分类列时最常见，但也可以对数字列执行此操作。例如，我们可能想要创建一个基于薪水的列，如果薪水高于另一列中的薪水，则将这些薪水相加，否则取两者之间的差额。这将帮助我们了解两列中的薪水是相等、更少还是更多。在 R 中，我们可以使用转换函数来实现此目的。
示例1
考虑以下数据框:
> set.seed(1001) > x1<-rpois(20,1) > y1<-rpois(20,5) > df1<-data.frame(x1,y1) > df1
输出
x1 y1 1 4 6 2 1 4 3 1 9 4 1 6 5 1 4 6 2 7 7 0 6 8 0 3 9 0 8 10 2 4 11 1 5 12 0 9 13 2 10 14 1 4 15 0 3 16 2 2 17 0 2 18 0 6 19 0 6 20 2 2
创建一个列 z1，如果 x1 大于 y1，则从 x1 中减去 y1，否则添加 y1:
示例
> df1<-transform(df1,z1=ifelse(x1>y1,x1-y1,x1+y1)) > df1
输出
x1 y1 z1 1 4 6 10 2 1 4 5 3 1 9 10 4 1 6 7 5 1 4 5 6 2 7 9 7 0 6 6 8 0 3 3 9 0 8 8 10 2 4 6 11 1 5 6 12 0 9 9 13 2 10 12 14 1 4 5 15 0 3 3 16 2 2 4 17 0 2 2 18 0 6 6 19 0 6 6 20 2 2 4
示例2
> df2<-transform(df1,z1=ifelse(x1 df2
输出
x1 y1 z1 1 4 6 2 2 1 4 3 3 1 9 8 4 1 6 5 5 1 4 3 6 2 7 5 7 0 6 6 8 0 3 3 9 0 8 8 10 2 4 2 11 1 5 4 12 0 9 9 13 2 10 8 14 1 4 3 15 0 3 3 16 2 2 4 17 0 2 2 18 0 6 6 19 0 6 6 20 2 2 4
示例3
> df3<-transform(df1,z1=ifelse(x1==y1,x1*y1,x1/y1)) > df3
输出
x1 y1 z1 1 4 6 0.6666667 2 1 4 0.2500000 3 1 9 0.1111111 4 1 6 0.1666667 5 1 4 0.2500000 6 2 7 0.2857143 7 0 6 0.0000000 8 0 3 0.0000000 9 0 8 0.0000000 10 2 4 0.5000000 11 1 5 0.2000000 12 0 9 0.0000000 13 2 10 0.2000000 14 1 4 0.2500000 15 0 3 0.0000000 16 2 2 4.0000000 17 0 2 0.0000000 18 0 6 0.0000000 19 0 6 0.0000000 20 2 2 4.0000000
