如何根据R中列的行值的子字符串选择data.table?