0

我用 wordcloud2 创建了一个漂亮的词云,但我只想显示出现 n 次的词。怎么做 ?

data <- read.table(text = 'my data', sep = ";")
dim(data)
library(tm)
documents <- Corpus(VectorSource(data$V2))
inspect(documents)

lapply(documents[1],as.character)
inspect(documents)

set.seed(1234)

tdm <- TermDocumentMatrix(documents)
m <- as.matrix(tdm)
v <- sort(rowSums(m),decreasing=TRUE)
d <- data.frame(word = names(v), freq = v)
d$word=rownames(d)

library("wordcloud2")
wordcloud2(d)
4

1 回答 1

0

最后,我使用了:

d <- d[c(1:n), ]

如果我想保留前 n 行数据

于 2020-10-02T07:25:56.050 回答