のプロット領域のワードクラウドのサイズをどのように大きくすることができますか。この例をここで複製しようとすると、R
http://onertipaday.blogspot.com/2011/07/word-cloud-in-r.html
は、ワードクラウドのプロット面積を大きくする方法を考え出す助けが必要です。 png( "wordcloud_packages.png"、width = 1280、height = 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()
これは参考になります。より良い答えが見つかると、私はこの質問を更新します。 –
チップのおかげで。テキストサイズが単語の頻度に比例しない問題を見つけたのかどうか疑問に思っていますか?私のシステムで例を実行すると、単語はすべて同じサイズです。システムフォントに問題がある可能性があります。ティア。 –
nvm、確かに、それはシステムフォントの問題でした!いずれにせよ、追加のフォントをインストールするには良い方法があります:http://blog.revolutionanalytics.com/2012/09/how-to-use-your-favorite-fonts-in-r-charts.html –