我想对名称以字符串 TRUST, LIMITED, INC., CO 结尾的数据进行子集化
数据看起来像这样
name date
abc TRUST 2018-01-01
123 Foundation 1997-02-06
Tim LIMITED 2002-06-04
SA INC. 1968-12-28
Yu Co 2005-01-24
Coca Cola Ltd. 1980-05-30
我已尝试以下方法,但它不适用于多种情况
df[grepl(paste0(c("TRUST", "LIMITED", "INC", "CO"), collapse = "|"), df$name), ]
它还提取了可口可乐公司行,但我不希望这样。
你可以试试:
df[grepl(paste0(c("TRUST", "LIMITED", "INC"), collapse = "|"), df$name), ]
name date
1 abc TRUST 2018-01-01
3 Tim LIMITED 2002-06-04
4 SA INC. 1968-12-28
与str_detect()
:
df %>%
filter(str_detect(name, paste0(c("TRUST", "LIMITED", "INC"), collapse = "|")))
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)