对列表中的数据帧列应用一些函数

我们可以循环通过 list ,通过删除第一列来对数据集的列进行子集,循环该子集,转换为 numeric ,将输出分配给数据集,并返回该数据集

lapply(LIST, function(x) {x[-1] <- lapply(x[-1], as.numeric); x[-1]})

或者另一个选择是

lapply(LIST, function(x) data.frame(lapply(x[-1], as.numeric)))

另外,如果需要根据类型进行转换,一个更简单的选项是 type.convert 可以应用于 data.frame S公司

lapply(LIST, type.convert)

或使用 tidyverse

library(dplyr)
library(purrr)
map(LIST, ~ .x %>%
               transmute_at(-1, as.numeric))