如何使用R中具有多个匹配项的字符列创建子集?