使用dplyr中的mutate_each函数时选择特定列

Question

    require(dplyr)
    ID <- c(1,2,3,4,5,6)
    Freq <- c(0.1,0.2,0.3,0.5,0.1,0.3)
    L.abc <- c(1,1,1,3,1,0)
    L.ABC <- c(0,3,2,4,1,1)
    T.xyz <- c(1,1,1,1,0,1)
    F.ABC <- c(4,5,6,5,3,1)

    df <- as.data.frame(cbind(ID, Freq, L.abc, L.ABC, T.xyz, F.ABC))

    df_new <- df %>% mutate_each(funs(.*Freq), starts_with("L."))        

是否有一种方法可以更改“starts_with”命令来选择所有以大写字母和句号开头的列？我尝试使用诸如“[A-Z]”之类的修改。都没有成功。

提前致谢

Answer 1

对于这些情况，matches会更合适

  df %>%
      mutate_each(funs(.*Freq), matches("^[A-Z]\\.", ignore.case=FALSE)) 

这里，我假设您想只选择以大写字母(^[A-Z])开头，后面跟着.的列名。我们必须转义.(\\.)，否则它将被视为任何单个字符。

除了starts_with部分之外，我没有更改任何内容。在mutate_each中，如果需要传递函数，可以在funs调用中传递函数。在上面的代码中，我们将matches选择的每个列(.)与'freq'列相乘。