group_by在dplyr中满足某个条件的变量

Question

我想总结下面数据框中以var_开头的数据集中所有其他变量的变量

dta <- data.frame(cbind(matrix(sample(1:10, 3000, replace = T), 
                           nrow = 100, 
                           ncol = 30),
                    matrix(rnorm(7000), 
                           nrow = 100, 
                           ncol = 70)))

names(dta) <- c(paste0('group_', 1:30), paste0('var_', 1:70))

我在思考一些可行的方法，但我没有取得任何成功

dta %>% group_by(!contains('var')) %>% summarize_all(mean)

在我的真实数据集中，group_变量首先具有不同的名称，但我基本上喜欢按要求汇总的所有变量进行分组。