如何在存储在 R 列表中的数据框中创建一列正方形?
要在存储在R列表中的数据框中创建一列正方形,我们可以按照以下步骤操作-
首先,创建一个数据框列表。
然后,使用lapply函数在列表中存储的数据框中创建一列正方形。
示例
创建数据框列表
使用data.frame函数创建数据框和列表函数来创建这些数据框的列表-
df1<-data.frame(x=round(rnorm(25),2)) df2<-data.frame(x=round(rnorm(25,5,1),2)) List<-list(df1,df2) List输出结果
执行时,上述脚本生成以下内容output(thisoutputwillvaryonyoursystemduetorandomization)-
[[1]] x 1 0.91 2 -0.39 3 0.64 4 0.09 5 0.35 6 -0.46 7 0.12 8 -0.64 9 0.11 10 -1.70 11 -0.47 12 0.37 13 1.65 14 1.00 15 -0.43 16 -0.05 17 0.44 18 0.17 19 -0.63 20 0.07 21 -1.77 22 -0.15 23 1.00 24 0.91 25 -0.91 [[2]] x 1 5.14 2 5.37 3 5.27 4 6.72 5 4.17 6 4.74 7 5.64 8 5.72 9 2.84 10 4.48 11 4.05 12 4.25 13 6.20 14 4.05 15 5.58 16 3.84 17 6.73 18 5.89 19 4.75 20 4.82 21 2.56 22 5.90 23 4.46 24 5.44 25 3.85
在存储在列表中的数据框中创建一列方块
使用lapply函数在存储在名为List的列表中的数据帧df1和df2中创建一列正方形,如下所示-
df1<-data.frame(x=round(rnorm(25),2)) df2<-data.frame(x=round(rnorm(25,5,1),2)) List<-list(df1,df2) lapply(List,function(x) { + x$Squared<-x$x^2 + return(x) + })输出结果
[[1]] x Squared 1 0.38 0.1444 2 0.77 0.5929 3 -0.88 0.7744 4 -0.49 0.2401 5 0.24 0.0576 6 -0.79 0.6241 7 -1.35 1.8225 8 0.13 0.0169 9 0.74 0.5476 10 0.50 0.2500 11 -0.85 0.7225 12 -0.45 0.2025 13 0.33 0.1089 14 0.66 0.4356 15 1.07 1.1449 16 0.26 0.0676 17 1.07 1.1449 18 -1.03 1.0609 19 0.10 0.0100 20 0.21 0.0441 21 -2.41 5.8081 22 1.31 1.7161 23 1.76 3.0976 24 -0.05 0.0025 25 -1.07 1.1449 [[2]] x Squared 1 5.81 33.7561 2 5.48 30.0304 3 5.27 27.7729 4 5.78 33.4084 5 4.63 21.4369 6 5.48 30.0304 7 3.00 9.0000 8 5.22 27.2484 9 4.75 22.5625 10 6.42 41.2164 11 6.25 39.0625 12 4.87 23.7169 13 3.96 15.6816 14 4.42 19.5364 15 3.56 12.6736 16 5.01 25.1001 17 2.76 7.6176 18 3.45 11.9025 19 5.97 35.6409 20 5.00 25.0000 21 4.16 17.3056 22 3.36 11.2896 23 3.59 12.8881 24 4.74 22.4676 25 3.97 15.7609