2012-02-12 12 views
10

tratando de replicar el ejemplo aquí;¿cómo se puede aumentar el tamaño de las nubes de palabra del área graficada en R

http://onertipaday.blogspot.com/2011/07/word-cloud-in-r.html

Necesita ayuda para encontrar la manera de aumentar el área de trazado de la nube de palabras. Cambiar los parámetros de alto y ancho en png ("wordcloud_packages.png", ancho = 1280, alto = 800) solo cambia la altura y el ancho del lienzo ... pero el área trazada permanece pequeña.

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() 

Respuesta

17

intente utilizar el parámetro res, en su lugar:

... 
png("wordcloud_packages.png", width=12,height=8, units='in', res=300) 
... 

enter image description here

+0

esto es útil. Gracias. Actualizaré esta pregunta si encuentro una mejor respuesta. –

+0

gracias por la sugerencia. ¿Me pregunto si te has encontrado con un problema donde el tamaño del texto no se escala con la palabra frecuencia? ejecutando los ejemplos en mi sistema, las palabras son todas del mismo tamaño. podría ser un problema con las fuentes del sistema. tia. –

+0

nvm, de hecho, ¡era un problema con las fuentes del sistema! en cualquier caso, este es un buen procedimiento para instalar fuentes adicionales: http://blog.revolutionanalytics.com/2012/09/how-to-use-your-favorite-fonts-in-r-charts.html –

0

si se incluyen par(mar = rep(0, 4)) como una línea separada inmediatamente después de la llamada a png que vamos a eliminar los márgenes, y la wordcloud usará todo el espacio disponible. Con esto, y posiblemente ajustando el parámetro res como se sugirió en la respuesta anterior, debe obtener lo que desea.

Cuestiones relacionadas