R，删除没有匹配正则表达式的列表

Question

在我解析了网站之后，我得到了这个列表，我只想将列表保留在列表中没有“#M”的位置。

 > a
[1] "/t5/SIM-CFD/td-p/3423843"                            
[2] "/t5/SIM-CFD/td-p/3423843/page/2"                     
[3] "/t5/SIM-CFD/m-p/4305885#M2261"                       
[4] "/t5/Support/m-p/4467611#M2801"

所以我的结果将如下所示。

 > result
[1] "/t5/SIM-CFD/td-p/3423843"                            
[2] "/t5/SIM-CFD/td-p/3423843/page/2"                     

我尝试过以下但不起作用..

a[grepl("#M", a , ]

有什么建议吗？听起来很简单，但我想不出解决方案。 谢谢！

Answer 1

试试这个：

a[!sapply(a,function(x) grepl("#M",x))]