regex - 使用 dplyr 在选定的列上添加具有行均值的列

Question

我有一个数据框，其中包含在不同时间点测量的多个变量(例如，test1_tp1、test1_tp2、test1_tp3、test2_tp1，test2_tp2，...)。

我现在尝试使用 dplyr 向数据框中添加一个新列，该数据框计算所选这些列的行平均值(例如， 所有时间点的平均值)测试1)。

1. 即使使用计算显式命名列的平均值的语法，我也很挣扎。我尝试但没有成功的是:

数据 %>% ... %>% 变异(test1_mean = 均值(test1_tp1、test1_tp2、test1_tp3、na.rm = TRUE)

我还想使用正则表达式/通配符来选择列名称，例如

数据 %>% ... %>% mutate(test1_mean = Mean(matches("test1_.*"), na.rm = TRUE)

Answer 1

您可以在 select 中使用 starts_with 来查找以特定字符串开头的所有列。

data %>%
  mutate(test1 = select(., starts_with("test1_")) %>%
           rowMeans(na.rm = TRUE))