将句子转换为R中的单词

Question

我有一个列形式的数据框 - 输入

Id  Comment
xc545   Ronald is a great person 
g6548   Hero worship is bad

我需要以Result的形式输出

Id  Words 
xc545   Ronald
xc545   is
xc545   a
xc545   great
xc545   person
g6548   Hero
g6548   worship
g6548   is
g6548   bad

需要一个R语句来执行此操作.

以下是我试过的 -

result<-lapply(input,function(x)strsplit(x[2]," "))

但是,这只返回一条记录.

Answer 1

假设DF您的data.frame,可能是:

> List <- strsplit(DF$Comment, " ")
> data.frame(Id=rep(DF$Id, sapply(List, length)), Words=unlist(List))
     Id   Words
1 xc545  Ronald
2 xc545      is
3 xc545       a
4 xc545   great
5 xc545  person
6 g6548    Hero
7 g6548 worship
8 g6548      is
9 g6548     bad

请注意,我的答案仅在每对单词之间有一个简单空格时才有效.