Как применить «сложенную» функцию в списке

Question

Я хотел бы применить «сложенную» функцию ко всем столбцам фрейма данных.

Для примера сумма (is.na). Но:

lapply(data, sum(is.na)) 

возвращает ошибку.

Конечно, один «простой» функция делает работу, например

lapply(data, is.na) 

Итак, как мы можем применить «функции функций»?

В частности, функция состоит я имею в виде

plot(table) 

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

Answer 1

Попробуйте

apply(data, 2, function(x) sum(is.na(x))) 
lapply(data, function(x) sum(is.na(x))) 
sapply(data, function(x) sum(is.na(x)))