Archive for April, 2010

Gráficos en R: Chuletas para ponerlos bonitos

Wednesday, April 28th, 2010

A la hora de poner bonitos los gráficos en R es buena idea tener a mano qué colores y símbolos podemos utilizar para hacerlo.

Os dejo aquí la lista de colores y la de símbolos con el script para que las podais crear vosotros mismos:

COLORES EN R
ColoursInR
Descargar versión en pdf

# Colores en R
pdf("ColoursInR.pdf", width=11.7, height=8.5)
plot.new()
legend(x="topleft",colors(), pch=15, col=colors(), bty="n", ncol=10, cex=0.5, pt.cex=1, inset=0)
dev.off()

SÍMBOLOS EN R (pch)
SymbolsInR
Descargar versión en pdf

# Símbolos en R
pdf("SymbolsInR.pdf", width=5.5, height=4.5)
plot.new()
legend(x="topleft", as.character(0:25), pch=c(0:25), bty="p", ncol=4, cex=1.5, pt.cex=1, inset=0)
dev.off()

Fuente original: aquí.

Tags: , ,
Posted in Gráficos | No Comments »

Leyenda en multiples plots

Tuesday, April 27th, 2010

Si haceis multiples plots y quereis colocar la leyenda debajo de todos ellos o a un lado. Primero, podeis determinar los margenes o aumentar las columnas o filas con par(mfrow=c(3,2)). El comando que hay que añadir es xpd=TRUE

opar <-par(mar = c(20, 4, 4, 4)) #Con par guardamos las opciones gráficas que queremos
#en este caso  aumentamos los  margenes
plot(1:10)
lines(1:10)
par(xpd=TRUE)  #xpd para poder usar los margenes
legend(locator (1),lty=1, col="black", legend="straigh line")
#locator nos  permite colocar una o varias leyendas donde le  señalemos con el ratón
par(opar) #restauramos las opciones de graficos iniciales

Tags: ,
Posted in Gráficos | No Comments »