R: Как использовать функции в глубоком вложенном списке?

Question

Я пытаюсь вычислить среднее значение переменной с именем disp для всех 250 фреймов данных в моем списке с именем: lst.

for(i in 1:250){
lst[[i]] <- sample_n(mtcars, 25, replace = TRUE)

}

Я могу получить доступ к disp в первом кадре данных как lst[[1]][["disp"]], но как я могу использовать sapply для вычисления среднего значения disp в каждом из250 образцов?

Answer 1

С tidyverse:

library(tidyverse)

     lst%>%
       map("disp")%>%
       map_dbl(mean)

      [1] 254.552 257.404 256.164 214.312 227.660 237.824 221.176 221.648 236.804 232.252 212.948 227.620 242.904
     [14] 271.348 251.412 196.428 207.600 257.244 211.756 220.416 248.980 234.524 275.780 220.720 189.656 230.968