Я пытаюсь найти быстрый способ извлечения элементов из списка фреймов данных.
Для этого я протестировал функцию lapply.Вот воспроизводимый пример:
i <- 2
dat <- replicate(100000, data.frame(x=1:5000, y = 1:5000, z = 1:5000), simplify=FALSE)
system.time(test <- lapply(dat, function(y) y[i, c("x", "y")]))
user system elapsed
7.69 0.00 7.73
В идеале, прошедшее время должно быть <= 1 секунда. </p>