Как перебрать циклы данных и удалить пустые столбцы (в R)?

Question

Я хочу удалить пустые столбцы для нескольких фреймов данных, используя цикл или lapply.

Мои кадры данных всегда начинаются с "test.xxx".

Если я делаю это один за другим, как показано ниже, это работает.

test.acc_consoles2 <- Filter(function(x)!all(is.na(x) || is.null(x) || x == "" || x == 0), test.acc_consoles2)

Однако, если я использую для цикла или Lapply, это не работает. Я уже пробовал следующий код.

for(i in lst) {
  i <- Filter(function(x)!all(is.na(x) || is.null(x) || x == "" || x == 0),x=i)
}

Я хочу иметь чистые кадры данных без пустых столбцов. Поскольку имеется 189 кадров данных, я бы хотел использовать цикл lapply или for.

Answer 1

Мы могли бы использовать lapply и фильтровать столбцы из каждого кадра данных в списке

output <- lapply(lst, function(df) 
     Filter(function(x)!all(is.na(x) || is.null(x) || x == "" || x == 0),df))