使用lapply將均值函數應用於數據幀列表

Question

假設您有一個n個數據幀的列表，對於這種情況，虹膜基數具有兩個變量Petal.Width和Species，我想使用apply或lapply來計算Petal.Width列的平均值。

df1 = iris[1:10,4:5]
df2 = iris[11:20,4:5]
...
df15 = iris[141:150,4,5]
df = list(df1,df2,...,df15)

我希望如果只有2個數據幀的結果如下

df = list(df1,df2)
df = list(df1,df2)
mean(df[[1]]$Petal.Width);mean(df[[2]]$Petal.Width)
[1] 0.22
[1] 0.25

謝謝

Answer 1

在lapply調用中定義所需的函數，如下所示：

lapply(df, function(x) mean(x$Petal.Width))

您還可以使用以下方法簡化df的構建：

df = split(iris[,4:5], cut(seq(1,nrow(iris)),15))