R 将带有空值的列表追加到数据帧

我正在使用NER库从数据框中的句子中提取人名

如果我跑步：

library(entity)
dat <- data.frame(texts=c('Henry went home', 'Drive a car', 'Two snowmen'), stringsAsFactors=FALSE)
person_entity(dat$texts)

如何将此列表作为附加列附加到数据框中？附加列可以是提取名称的列表，甚至只是列表的长度，例如：

dat <- data.frame(texts=c('Henry went home', 'Drive a car', 'Two snowmen'), person_count=c(1,0,0), stringsAsFactors=FALSE)

一种方法是使用长度来获取列表中单个元素的长度

dat$person_count <- lengths(person_entity(dat$texts))

---

哇，这太简单了。非常感谢。我找到的其他方法都去掉了空值。

dat$person_count <- lengths(person_entity(dat$texts))