में यहां उदाहरण दोहराने की कोशिश कर रहे प्लॉट किए गए क्षेत्र वर्डक्लोउड के आकार को कैसे बढ़ाया जा सकता है;आर
http://onertipaday.blogspot.com/2011/07/word-cloud-in-r.html
पता लगाना शब्द बादल के लिए साजिश रची क्षेत्र में वृद्धि करने के लिए कैसे की आवश्यकता है। पीएनजी ("wordcloud_packages.png", चौड़ाई = 1280, ऊंचाई = 800) में ऊंचाई और चौड़ाई वाले पैरामीटर को बदलना केवल कैनवास की ऊंचाई और चौड़ाई को बदलता है .. लेकिन प्लॉटेड क्षेत्र छोटा रहता है।
require(XML)
require(tm)
require(wordcloud)
require(RColorBrewer)
u = "http://cran.r-project.org/web/packages/available_packages_by_date.html"
t = readHTMLTable(u)[[1]]
ap.corpus <- Corpus(DataframeSource(data.frame(as.character(t[,3]))))
ap.corpus <- tm_map(ap.corpus, removePunctuation)
ap.corpus <- tm_map(ap.corpus, tolower)
ap.corpus <- tm_map(ap.corpus, function(x) removeWords(x, stopwords("english")))
ap.tdm <- TermDocumentMatrix(ap.corpus)
ap.m <- as.matrix(ap.tdm)
ap.v <- sort(rowSums(ap.m),decreasing=TRUE)
ap.d <- data.frame(word = names(ap.v),freq=ap.v)
table(ap.d$freq)
pal2 <- brewer.pal(8,"Dark2")
png("wordcloud_packages.png", width=1280,height=800)
wordcloud(ap.d$word,ap.d$freq, scale=c(8,.2),min.freq=3,
max.words=Inf, random.order=FALSE, rot.per=.15, colors=pal2)
dev.off()
यह सहायक है .. धन्यवाद। अगर मुझे बेहतर उत्तर मिल जाए तो मैं इस सवाल को अपडेट कर दूंगा। टिप के लिए –
धन्यवाद। बस सोच रहा है कि क्या आप किसी ऐसे मुद्दे पर आ गए हैं जहां टेक्स्ट आकार शब्द आवृत्ति के साथ स्केल नहीं करता है? मेरे सिस्टम पर उदाहरण चला रहा है, शब्द सभी एक ही आकार के हैं। सिस्टम फोंट के साथ एक मुद्दा हो सकता है। तिया। –
एनवीएम, वास्तव में, यह सिस्टम फोंट के साथ एक मुद्दा था! किसी भी मामले में, यहां अतिरिक्त फोंट स्थापित करने के लिए एक अच्छा तरीका है: http://blog.revolutionanalytics.com/2012/09/how-to-use-your-favorite-fonts-in-r-charts.html –