R提取某一列中含相同字符的行