如何在存储在 R 列表中的数据框中创建一列产品？

要在存储在 R 列表中的数据框中创建一列产品，我们可以按照以下步骤操作 -

• 首先，创建一个数据框列表。

• 然后，使用 lapply 函数在存储在列表中的数据框中创建一列产品。

示例

创建数据框列表

使用data.frame函数创建数据框和列表函数来创建这些数据框的列表 -

df1<-data.frame(x=rpois(25,5),y=rpois(25,3))
df2<-data.frame(x=rpois(25,1),y=rpois(25,2))
List<-list(df1,df2)
List

输出结果

执行时，上述脚本生成以下内容output(this output will vary on your system due to randomization)-

[[1]]
    x y
1   7 2
2   5 4
3   7 1
4   4 4
5   2 3
6   5 0
7   6 2
8   4 4
9   4 2
10  4 6
11  2 2
12  3 5
13 11 2
14  4 3
15  4 2
16  6 3
17 10 6
18  6 1
19  1 2
20  6 1
21  3 2
22  7 5
23  8 4
24  7 5
25  4 2
[[2]]
   x y
1  0 1
2  0 3
3  2 1
4  1 1
5  1 1
6  1 0
7  2 1
8  3 1
9  1 1
10 1 1
11 0 3
12 1 2
13 1 1
14 2 4
15 1 2
16 3 5
17 2 3
18 1 1
19 1 3
20 1 3
21 0 4
22 0 2
23 2 3
24 2 1
25 1 2

在存储在列表中的数据框中创建一列产品

使用 lapply 函数在存储在名为 List 的列表中的数据帧 df1 和 df2 中创建一列产品，如下所示 -

df1<-data.frame(x=rpois(25,5),y=rpois(25,3))
df2<-data.frame(x=rpois(25,1),y=rpois(25,2))
List<-list(df1,df2)
lapply(List,function(x) {
+ x$Product<-x$x*x$y
+ return(x)
+ })

输出结果

[[1]]
    x y Product
1   7 2 14
2   5 4 20
3   7 1  7
4   4 4 16
5   2 3  6
6   5 0  0
7   6 2 12
8   4 4 16
9   4 2  8
10  4 6 24
11  2 2  4
12  3 5 15
13 11 2 22
14  4 3 12
15  4 2  8
16  6 3 18
17 10 6 60
18  6 1  6
19  1 2  2
20  6 1  6
21  3 2  6
22  7 5 35
23  8 4 32
24  7 5 35
25  4 2  8
[[2]]
   x y Product
1  0 1 0
2  0 3 0
3  2 1 2
4  1 1 1
5  1 1 1
6  1 0 0
7  2 1 2
8  3 1 3
9  1 1 1
10 1 1 1
11 0 3 0
12 1 2 2
13 1 1 1
14 2 4 8
15 1 2 2
16 3 5 15
17 2 3 6
18 1 1 1
19 1 3 3
20 1 3 3
21 0 4 0
22 0 2 0
23 2 3 6
24 2 1 2
25 1 2 2