Программирование с помощью Dplyr - передача строки в функцию - PullRequest
0 голосов
/ 15 января 2019

Я пытаюсь передать строку функции, которая использует dplyr::filter, но я не уверен, как это сделать, даже после прочтения статьи на сайте Tidyverse . Благодарен за любые указатели.

В идеале я надеюсь передать строку, такую ​​как 'survey', в функцию ниже, чтобы использовать ее в функциях str_detect.

Моя попытка:

sel_measures <- function(data_source, variable) {
variable <- rlang::sym(variable)

data_source %>% 
 filter(str_detect(summary, !!variable) | 
           str_detect(labels, !!variable) | 
           str_detect(labels_1, !!variable) | 
           str_detect(labels_2, !!variable) | 
           str_detect(labels_3, !!variable) | 
           str_detect(labels, 'gene') | 
           str_detect(labels_1, 'gene') | 
           str_detect(labels_2, 'gene') | 
           str_detect(labels_3, 'gene') |
           str_detect(labels, 'nerv') | 
           str_detect(labels_1, 'nerv') | 
           str_detect(labels_2, 'nerv') | 
           str_detect(labels_3, 'nerv'),
           str_detect(issue_type, 'Task') |
           str_detect(issue_type, 'Issue')
         ) %>% select(summary, priority, assignee, 'last comment', labels) %>% 
  filter(status != 'Done') %>% 
  arrange(priority, status)
} 
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...