我在data.frame中有一条推文列表,我可以使用它们从中提取主题标签列表
> rpg.twitter.df$hashtags <-
regmatches(rpg.twitter.df$text,gregexpr("#(\\d|\\w)+",rpg.twitter.df$text))
最后,每一行都有一个列表。现在,我想用逗号分隔的字符串(每行一个)将每个列表弄平
我尝试了这个:
do.call("paste", c(rpg.twitter.df$hashtags, sep=", "))
但它不起作用,因为它最终以一个巨大的 vector 结尾。如果我将
regmatches
用unlist(..., recursive=FALSE)
括起来也一样关于如何解决的任何想法?
可重现示例的一些数据:
rpg.twitter.df <- data.frame(text=rbind("World of Warcrack: http://t.co/3MNRpArnGw #wow #WorldOfWarcraft #warcraft #mmorpg #rpg #RPGChat #gaming #pcgaming #online @WoW_en @NewsWoW", "@ashleythedragon join my journey in Tweeria http://t.co/CFKDLA3ASE #rpg", "How to use of #RPG for motivation #timeboxing http://t.co/mwwN5xErHx"))
最佳答案
你可以做:
sapply(rpg.twitter.df$hashtags, paste, collapse = ",")
关于r - 使用R在数据框中逐行取消列出(展开列表),我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/26276449/