10
cố gắng sao chép ví dụ ở đây;làm cách nào để tăng kích thước của các ô chữ trong vùng được vẽ trong R
http://onertipaday.blogspot.com/2011/07/word-cloud-in-r.html
Cần giúp đỡ để tìm ra cách để tăng diện tích âm mưu của đám mây từ. Thay đổi chiều cao và chiều rộng parmeters trong png ("wordcloud_packages.png", chiều rộng = 1280, chiều cao = 800) chỉ thay đổi chiều cao và chiều rộng của canvas .. nhưng khu vực vẽ vẫn còn nhỏ.
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()
điều này hữu ích..thanks. Tôi sẽ cập nhật câu hỏi này nếu tôi tìm thấy câu trả lời tốt hơn. –
cảm ơn mẹo. chỉ cần tự hỏi nếu bạn đã gặp một vấn đề mà kích thước văn bản không quy mô với tần số từ? chạy các ví dụ trên hệ thống của tôi, các từ có cùng kích thước. có thể là một vấn đề với phông chữ hệ thống. tia. –
nvm, thực sự, đó là một vấn đề với phông chữ hệ thống! trong mọi trường hợp, đây là cách thực hiện tốt cài đặt phông chữ bổ sung: http://blog.revolutionanalytics.com/2012/09/how-to-use-your-favorite-fonts-in-r-charts.html –