Использование map_int с комбинацией length () / formals ()

Question

Я пытаюсь получить количество аргументов в списке функций из пакета, используя функцию map_int ().

Кажется, это вывод, который я ищу вручную:

length(names(formals(add_count)))

Но проблема заключается в применении этой серии функций с помощью map () для автоматизации этого процесса и, в конечном итоге, возврата top /Наименьшая функция с наибольшим / наименьшим числом аргументов:

map(dplyr_functions, length(formals))

Вышеприведенное возвращает ошибку «Ошибка: не удается извлечь из замыкания»

Пока что это похоже навернуть список аргументов списка функций:

map(dplyr_functions, formals)

Но у меня возникают проблемы с получением действительного числа, как при возврате

length(formals(add_count))

Большое спасибо за ваше руководство

Answer 1

Вот короткая рука, чтобы сделать это с compose (который также из purrr)

library(dplyr)
library(purrr)
map(list(add_count, summarise), compose(length, formals))