Предполагая, что кадры данных называются df1
, df2
et c, мы можем получить их в списке, используя mget
, выбрать строки с положительными значениями в 3-м столбце и выбрать 3-й и 4-й столбцы.
list_df <- lapply(mget(paste0('df', 1:95)), function(df)
subset(df, df[[3]] > 0, select = 3:4))
Если данные уже есть в списке, мы можем сделать:
list_df <- lapply(All_data, function(df) subset(df, df[[3]] > 0, select = 3:4))