_覓 | 覦覈襦 | 豕蠏手 | 殊螳 | 譯殊碁 |
FrontPage › Plot朱企Μ蠍
|
|
imageDir <- 'p:\\tmp\\plots'; image_filename = tempfile(pattern = "plot_", tmpdir = imageDir, fileext = ".png") png(filename=image_filename, units="mm", width=250, height=250, res=300) #讌螻 覈蟆 蠏碁れ. wordcloud(mydata$word, mydata$freq, scale=c(5,0.75), max.words=100, min.freq=1, random.order=FALSE, rot.per=0.35, use.r.layout=FALSE, colors=brewer.pal(8, "Dark2")) dev.off(); #谿瑚 #word_plot <- paste(readBin(file(image_filename, "rb"), what=raw(), n=1e6), collapse="") #binary襦 覦蠖譯朱蟇
鏤
|
螻手碓襯 蟆 れる慨讌 襷. 蠏瑚 れ れ . 襯 蠍磯´蟆 伎. 蠏瑚 蠏碁 蟆企. 谿 蠍一朱 れ襷螻 螳 覓伎螳襯 襷朱. |