带括号的动态groupby函数 df1% 分组依据（档位）%>% 总结（Mittelwert=平均值（mpg，na.rm=真实值）） df1 df2% 分组依据（mtcars[[10]]）%>% 总结（米特沃特=平均值（mtcars[[1]]），na.rm=真实值） df2

最后一段代码给出了整个data.frame的平均值。因为这段代码是在循环中使用的，所以我需要使用括号。你能帮我得到一个具有有效结果的动态代码吗？

如果我们想避免使用名称，我们可以使用

groupby\u at

和

summary\u at

来指定列号

df1 <- mtcars %>%
    group_by(gear) %>%
    summarise(Mittelwert = mean(mpg, na.rm = TRUE))
df1

df2 <- mtcars %>%
    group_by(mtcars[[10]]) %>%
    summarise(Mittelwert = mean(mtcars[[1]]), na.rm = TRUE)
df2

库（dplyr）
mtcars%>%
（10）%
总结（1，平均值，na.rm=真）
#一个tibble:3x2
#齿轮mpg
#   
#1  3.00  16.1
#2  4.00  24.5
#3  5.00  21.4

这相当于

library(dplyr)
mtcars %>%
  group_by_at(10) %>%
  summarise_at(1, mean, na.rm = TRUE)

# A tibble: 3 x 2
#   gear   mpg
#  <dbl> <dbl>
#1  3.00  16.1
#2  4.00  24.5
#3  5.00  21.4

mtcars%>%
分组依据（档位）%>%
总结（Mittelwert=平均值（mpg，na.rm=真实值））
#齿轮手套
#        
#1  3.00       16.1
#2  4.00       24.5
#3  5.00       21.4

包括您正在使用的软件包；使用的输入（

权重

）；想要输出。还有，什么循环（在什么循环上迭代）？为什么要将

[[6]]

与

[[41]]]

一起使用，这背后的逻辑是什么？

mtcars %>%
    group_by(gear) %>%
    summarise(Mittelwert = mean(mpg, na.rm = TRUE))

#   gear Mittelwert
#  <dbl>      <dbl>
#1  3.00       16.1
#2  4.00       24.5
#3  5.00       21.4