Строки конкретного столбца на основе совпадения строк

Question

У меня есть список из 11 фреймов данных, и я хочу применить функцию, которая использует строки для создания еще одного столбца сумм для каждой строки на основе определенных критериев соответствия строки в каждом из 11 фреймов данных.

Я пытался использовать select(contains()).Я не смотрю на использование mutate, если возможно, тогда, пожалуйста, покажите ошибку в приведенном ниже коде.

myfiles3 <- lapply(myfiles2, function(x) {x$CHINA2 <- rowSums(x[select(x, contains("China"))], na.rm = T); x})

Выдает ошибку как Error in [. Default (x, select(x, contains("China"))) : invalid subscript type 'list'.

Answer 1

Очень сложно протестировать без набора образцов данных. Попробуйте:

library(tidyverse)
library(hablar)

myfiles2 %>% 
  map_df(~.x %>% mutate(china2 = row_sum_(contains("China"))))

Answer 2

Я не знаю, почему так сложно ответить на любой вопрос, как -1, не задумываясь о том, что в сообществе огромное разнообразие. Наконец, решил это следующим образом:

myfiles3 <- lapply(myfiles2, function(x) {x$CHINA2 <- rowSums(x[,grep("China", names(x))], na.rm = T); x})