Попытка получить сводные переменные в таблицу

Question

Так что я работаю над проектом, который рассматривает пространства различных парковочных мест. По сути, я хотел бы, чтобы переменные из итоговых данных (среднее значение, квантиль, IQR, sd, max, min, медиана) в таблицу, чтобы при запуске она представляла собой таблицу со всеми различными переменными для каждого из моих пространств Carpark ,

Я попробовал следующий код (я видел его в другом вопросе переполнения стека)

newlist <-list(mean, quantile, IQR, sd, max, min, median)
val <- lapply(newlist, function(fn) fn(densities))

Но возникает ошибка: fn(densities) не найден.

Answer 1

Я думаю, вы хотите что-то вроде этого:

summary <- function(x) {
  funs <- c(mean, median, sd, mad, IQR)
  lapply(funs, function(f) f(x, na.rm = TRUE))
}

Только для числовых переменных:

sapply(mtcars, function(x) { if(is.numeric(x)) summary(x) })