Так что я думаю, что у меня возникла простая проблема.
У меня есть датафрейм (my_data), который выглядит следующим образом
Treatment Amount Duration
a 5 3000
b 8 2000
c 6 1000
d 2 5000
Теперь я хочусоздайте новый фрейм данных (my_data_1), который добавляет новый столбец на основе простой функции Duration/Amount.
my_data_1 должен выглядеть следующим образом:
Treatment Amount Duration Mean duration
a 5 3000 600
b 8 2000 250
c 6 1000 167
d 2 5000 2500
Я пыталсянаписать функцию и внедрить ее в мой фрейм данных
mean_duration <- function(md){my_data$Duration / my_data$Amount}
my_data_1$md <- with(my_data, ave(Duration, Amount, FUN = mean_duration))
Где я ошибся?