R语言怎么生成双元词bi-gram的dtm矩阵

R语言怎么生成双元词bi-gram的dtm矩阵

library(tm)
library(SnowballC)
corpus <- Corpus(DirSource("D:/******/****"))
corpus <- tm_map(corpus, content_transformer(tolower))
corpus <- tm_map(corpus, removeNumbers)
corpus <- tm_map(corpus, removePunctuation)
corpus <- tm_map(corpus, stripWhitespace)
corpus <- tm_map(corpus, removeWords, stopwords("english"))
dtm_unigram<-DocumentTermMatrix(corpus)

类似上面这种生成一元词

参考该文档：https://blog.csdn.net/mandy_pku/article/details/52623404