У меня есть датафрейм со многими полями.Я хочу получить некоторую сводку из 10-12 полей, используя функцию суммирования.соответствующие поля названы в seq как V1-V10.Я пытаюсь написать функцию, которая будет принимать ввод от 1 до 10, а затем давать сводку по V1-V10.
BMI <- data.frame(
V1 = c("Male", "Male","Female"),
V2 = c(42,38,26),
height = c(152, 171.5, 165),
weight = c(81,93, 78)
)
g <- function(x)c(Mean=mean(x,na.rm=TRUE),Median=median(x,na.rm=TRUE),Min=min(x,na.rm=TRUE),Max=max(x,na.rm=TRUE))
t <- summarize(BMI$V2,BMI$V1,g)
t
tt <- summarize(BMI$get(paste0("V",2)),BMI$get(paste0("V",1)),g)
tt
t работает нормально.Я ожидаю, что t и tt будут одинаковыми.Но получение ошибки для tt, как показано ниже,
Ошибка в суммировании (BMI $ get (paste0 ("V", 2)), BMI $ get (paste0 ("V", 1)), g): попыткаприменить нефункциональный