Пользовательская функция tapply () - PullRequest
Новая
       29

Пользовательская функция tapply ()

0 голосов
/ 02 марта 2020

Мне нужна помощь в создании пользовательской функции tapply (). Мне кажется, что я знаю интуицию, стоящую за tapply (), но я не могу создать пользовательскую функцию.

Например, если мы используем встроенный набор данных mtcars, я мог бы использовать tapply, чтобы найти среднее значение. по размеру цилиндра, введя tapply(X = mtcars$mpg, INDEX = mtcars$cyl, FUN = mean).

Теперь, как бы я go получил это без непосредственного использования функции tapply ()? До сих пор я произвел следующее, но оно не работает: 

custom_tapply = function(X = mtcars$mpg , INDEX = mtcars$cyl, FUN = mean) {
  for (X in levels(factor(INDEX))) {
    result = mean(X)
  }
  return(result)
}

Любая помощь будет оценена.

...