我有两个字符串:
string <- c("abcd", "efgh", "jklo", "mnop")
delete <- c("ab", "ef")
delete
包含string
中元素的部分(但明确)匹配。现在,我要删除string
中的相应元素。
以下代码产生了我的预期输出:
string[!as.logical(rowSums(sapply(delete, function(x){grepl(x, string)})))]
# [1] "jklo" "mnop"
尽管这可行,但对我来说似乎相当复杂(考虑到问题的简单性)。有更简洁的选择可以实现我想要的吗?
答案 0 :(得分:4)
一种选择是用定界符/resources/views/vendor/mail/html/message.blade.php
paste
来将'delete'与|
中的pattern
进行匹配,并在将grep
指定为TRUE,并将invert
指定为TRUE
value