同时使用select和stringr

Question

我在努力

qual %>% select(reasons_code) %>% str_replace('\\+.*',replacement = '')

但我得到了警告信息:在stri_replace_first_regex(字符串、模式、fix_replacement(替换))中，参数不是原子向量；胁迫。

但是，当我执行以下操作时，替换效果很好。

str_replace(qual$reasons_code,'\\+.*',replacement = '')

有人知道为什么会这样吗？

Answer 1

对于?str_replace，输入string是

字符串-输入向量。要么是字符向量，要么是可强迫性的东西。

同时，select的输出是一个data.frame，其中选择了一个列。它没有转换为vector。而不是select，我们可以将列pull为vector，并且它应该可以工作。

library(dplyr)
qual %>%
      pull(reasons_code) %>%
      str_replace('\\+.*',replacement = '')

或者，如果我们更喜欢在select中使用OP的代码，有几种方法可以转换为vector -- unlist就是其中之一。

qual %>% 
    select(reasons_code) %>% 
    unlist %>%
    str_replace('\\+.*',replacement = '')