在dplyr工作流程中组合grpup_by和grepl

Question

我希望实现一个简单的任务，即使用group_by或等效的函数匹配短语将一组列传递到dplyr中的grepl。

使用以下示例可以很容易地说明问题：

实施例

数据

set.seed(1)
dta <- data.frame(firstThing = 1:10, secondThing = 20:29)
for (i in 3:20) {
  dta[,i] <- runif(n = 10)
  colnames(dta)[i] <- paste0("KeyMeasureWithValues", i)
}

分组

我想将dta data.frame归为变量名中包含 measure 字的所有变量，例如：

dta %<>%
  group_by(grep(pattern = "measure", x = colnames(.),
                value = TRUE, ignore.case = TRUE)) %>% 
  tally()

但是，代码会返回错误消息：

Error: wrong result size (18), expected 10 or 1

Answer 1

我们可以使用Template format error: Every DeletionPolicy member must be a string. 和.dots

group_by_