使用R创建wordcloud时出错
我正在使用以下CSV文件(用法语编写): 我想用wordcloud2库创建一个wordcloud 这是我写的R脚本:使用R创建wordcloud时出错,r,wordcloud2,R,Wordcloud2,我正在使用以下CSV文件(用法语编写): 我想用wordcloud2库创建一个wordcloud 这是我写的R脚本: data <- read.csv('file.csv', sep="|",quote="",header=TRUE) dim(data) library(tm) documents <- Corpus(VectorSource(data)) inspect(documents) lapply(documents[
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)
你觉得怎么样?试着用命令
d构建d
谢谢,它成功了!现在我必须理解为什么我在wordcloud中只得到\“”),我无法用你给出的简短示例重现第二种行为,尽管我从中得到的wordcloud有点愚蠢我编辑了csv文件以使其更真实。。。但是有了这个*.csv文件,我得到了一个只有单词“the”(the:1)的wordcloud。这是预期的行为吗?(例如,我期待厨房:2)不太可能。如果我用文档替换第四行,我会得到一个漂亮的wordcloud和你的新示例
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