如何在儲存在 R 列表中的資料框中建立另一列的冪列?
要建立儲存在 R 列表中的資料框中另一列的冪列,我們可以按照以下步驟操作:
首先,建立一個數據框列表。
然後,使用 lapply 函式在儲存在列表中的資料框中建立另一列的冪列。
示例
建立資料框列表
使用 data.frame 函式建立資料框,並使用 list 函式建立這些資料框的列表:
df1<-data.frame(x=sample(1:10,25,replace=TRUE),y=sample(1:5,25,replace=TRUE)) df2<-data.frame(x=sample(1:2,25,replace=TRUE),y=sample(1:5,25,replace=TRUE)) List<-list(df1,df2) List
輸出
執行上述指令碼後,將生成以下輸出(由於隨機化,此輸出將在您的系統上有所不同):
[[1]] x y 1 9 4 2 4 4 3 4 1 4 6 3 5 8 4 6 6 3 7 4 1 8 5 2 9 8 5 10 10 2 11 2 4 12 9 3 13 9 4 14 6 2 15 10 3 16 10 1 17 4 2 18 5 5 19 2 1 20 3 4 21 7 5 22 7 4 23 4 2 24 7 4 25 6 2 [[2]] x y 1 2 5 2 1 5 3 1 2 4 1 1 5 1 4 6 2 1 7 1 2 8 1 2 9 1 3 10 1 5 11 1 2 12 2 4 13 2 4 14 1 3 15 2 4 16 2 3 17 1 1 18 2 1 19 1 2 20 1 5 21 2 5 22 1 3 23 1 4 24 2 3 25 2 1
建立另一列的冪列
使用 lapply 函式在儲存在名為 List 的列表中的資料框 df1 和 df2 中建立另一列的冪列,如下所示:
df1-data.frame(x=sample(1:10,25,replace=TRUE),y=sample(1:5,25,replace=TRUE))
df2<-data.frame(x=sample(1:2,25,replace=TRUE),y=sample(1:5,25,replace=TRUE))
List<-list(df1,df2)
lapply(List,function(x) {
+ x$PowerCol2<-(x$x)^(x$y)
+ return(x)
+ })輸出
[[1]] x y PowerCol2 1 9 4 6561 2 4 4 256 3 4 1 4 4 6 3 216 5 8 4 4096 6 6 3 216 7 4 1 4 8 5 2 25 9 8 5 32768 10 10 2 100 11 2 4 16 12 9 3 729 13 9 4 6561 14 6 2 36 15 10 3 1000 16 10 1 10 17 4 2 16 18 5 5 3125 19 2 1 2 20 3 4 81 21 7 5 16807 22 7 4 2401 23 4 2 16 24 7 4 2401 25 6 2 36 [[2]] x y PowerCol2 1 2 5 32 2 1 5 1 3 1 2 1 4 1 1 1 5 1 4 1 6 2 1 2 7 1 2 1 8 1 2 1 9 1 3 1 10 1 5 1 11 1 2 1 12 2 4 16 13 2 4 16 14 1 3 1 15 2 4 16 16 2 3 8 17 1 1 1 18 2 1 2 19 1 2 1 20 1 5 1 21 2 5 32 22 1 3 1 23 1 4 1 24 2 3 8 25 2 1 2
廣告
資料結構
網路
關係資料庫管理系統
作業系統
Java
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP