[英]Append list with NULLs to data frame
我正在使用NER庫( 實體 )從數據框中的句子中提取人名。
如果我運行:
library(entity)
dat <- data.frame(texts=c('Henry went home', 'Drive a car', 'Two snowmen'), stringsAsFactors=FALSE)
person_entity(dat$texts)
我得到了提取名稱的列表:
> person_entity(dat$texts)
[[1]]
[1] "Henry"
[[2]]
NULL
[[3]]
NULL
如何將此列表作為附加列添加到數據框? 附加列可以是提取名稱的列表,甚至只是列表的長度,例如:
dat <- data.frame(texts=c('Henry went home', 'Drive a car', 'Two snowmen'), person_count=c(1,0,0), stringsAsFactors=FALSE)
一種方法是使用lengths
來獲取列表中各個元素的長度。
dat$person_count <- lengths(person_entity(dat$texts))
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.