我正在使用以下 CSV 文件(用法语编写):
"1";"Paul is in the kitchen"
"2";"Peter is cooking in the living-room"
"3";"The kitchen is beautiful"
我想用 wordcloud2 库创建一个 wordcloud。
这是我写的 R 脚本:
data <- read.csv('file.csv', sep="|",quote="",header=TRUE)
dim(data)
library(tm)
documents <- Corpus(VectorSource(data))
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(freq = v)
d$word=rownames(d)
library("wordcloud2")
wordcloud2(d)
但我收到以下错误:
> wordcloud2(d)
Error in size * 180/max(dataOut$freq) :
non-numeric argument to binary operator
你怎么看 ?