R语言画云字图

install.packages('wordcloud')
library(wordcloud)
colors=c('red','blue','green','yellow','purple')
data=read.csv("data.csv") 
wordcloud(data$words, data$freq, 
          scale=c(10,0.5),min.freq=-Inf,max.words=Inf,colors=colors,random.order=F,random.color=F,ordered.colors=F)