r - 如何获取列表列中包含元素的行

Question

我有一个数据表如下:

library(data.table)

dt <- data.table(
  id = c(1:3),
  string = list(c("tree", "house", "star"),  
                c("house", "tree", "dense forest"), 
                c("apple", "orange", "grapes"))
  )

由此我想获得列表字符串列中包含“树”的行。 所以我尝试了

dt["tree" %in% string]
Empty data.table (0 rows) of 2 cols: id,string


dt["tree" %in% unlist(string)]
   id                  string
1:  1         tree,house,star
2:  2 house,tree,dense forest
3:  3     apple,orange,grapes

我不确定我做错了哪一部分。我只需要返回 id 1 和 2。感谢任何帮助。

Answer 1

或者只是

library(data.table)
dt[grep("\\btree\\b", string)]

   id                  string
1:  1         tree,house,star
2:  2 house,tree,dense forest

看起来你的方法有什么问题是 %in% 对列表不起作用

"tree" %in% dt$string[1]
[1] FALSE

而 grep() 或 grepl() 接受它可以强制转换为字符向量的所有内容

grepl("tree", dt$string[1])
[1] TRUE

as.character(dt$string[1])
[1] "c(\"tree\", \"house\", \"star\")"

这意味着它还会将其他单词与 IF 中的 tree 匹配为 @RonakShah 提醒我你不要使用单词边界 \b。