循环遍历r数据帧的列，并将相邻的记录配对

我有一个演讲中使用的单词数据框，我想计算某些单词配对的次数。单词的顺序正确，所以我只需要在列中循环，并将每个单词与前面的单词配对

从

order | word
------------
1     | hello    
------------
2     | my
------------
3     | name    
------------
4     | is

所需的输出如下：

order | word | pair
--------------------
1     | hello| hello     
--------------------
2     | my   | hello my
--------------------
3     | name | my name  
--------------------
4     | is   | name is

---

提前谢谢

我们可以删除最后一个“单词”（

word[-length（word）]

）和第一个单词（

word[-1]

），

粘贴

它可以与第一个元素连接以创建“pair”列

df1$pair <- with(df1, c(word[1], paste(word[-length(word)], word[-1])))
df1$pair
#[1] "hello"    "hello my" "my name"  "name is" 

---

df1$pair我们可以删除最后一个“单词”（
word[-length（word）]
）和第一个单词（
word[-1]
），
paste
它可以与第一个元素连接以创建“pair”列

df1$pair <- with(df1, c(word[1], paste(word[-length(word)], word[-1])))
df1$pair
#[1] "hello"    "hello my" "my name"  "name is" 

df1$pair您可以使用
Hmisc
软件包中的
Lag
功能

library(Hmisc)
df$pair <- with(df, paste(Lag(word), word))
df$pair

# [1] " hello"   "hello my" "my name"  "name is" 

库（Hmisc）
df$pair您可以使用
Hmisc
软件包中的
Lag
功能

library(Hmisc)
df$pair <- with(df, paste(Lag(word), word))
df$pair

# [1] " hello"   "hello my" "my name"  "name is" 

库（Hmisc）
df$对