Edicion. Texto

Libreria

ggplot2

Datos

sotero.csv, son datos de la mortalidad de Helicoverpa zea a diferentes dosis de la endotoxina de Bacillus thuringiensis. El trabajo se hizo con colectas de insectos de varias localidades (Sotero et al. 2007. Agrociencia. 41: 653-662 ).

mcol.csv, contiene información sobre capturas de diferentes especies de escarabajos estercoleros sujetos a dos tratamientos, con ivermectina CI y sin ivermectina SI. El experimento fue realizado por Carolina Flota (Flota et al. Tropical and Subtropical Agroecosystems. 15:227-239)

mzdbca.csv, es un ensayo el cual se evaluaron diferentes variedades de maiz en su rendimiento, se realizó el experimento en un diseño en bloques completos al azar.

Los archivos se encuentran aquí:

https://sites.google.com/site/digitcognem/workfiles

Introducción

Uno de los aspectos que usualmente tiene que abordar el usuario de la libreria ggplot2 es lo relativo al texto. Tanto el texto en los valores de los ejes cartesianos, sus títulos, así como los de la leyenda, usualmente es necesario cambiarlo para hacerlo mas visible, incrementar el tamaño del tipo de letra. Otro aspecto importante es cambiar el tipo de font, pues el tipo convencional es Helvetica; sin embargo, en publicaciones científicas otro tipo de letra que se pide es el "Times New Roman" o bien, simplemente por cambiar el estilo en una presentación visual, sería conveniente cambiar el tipo de letra (= Fuente).

Cambiar Tamaño de Letra en Ejes Cartesianos

La figura base del efecto de dosis de la toxina de BT en H. zea es:

m1<- ggplot(sotero,aes(dosis, mort, colour= loc)) + geom_point(aes(shape= loc), size=5) + geom_line(size= 1) + scale_x_log10() + theme_bw() + xlab("DOSIS") + ylab("MORTALIDAD")

Observe que los títulos de los ejes X e Y se han cambiado y la escala del eje X es logarítmica.

Para incrementar el tamaño de letra de los ejes, tanto el texto de las marcas como de su título, la instrucción es la siguiente:

m1 + theme(axis.text= element_text(size= 18), axis.title=element_text(size= 24, face="bold"))

Lo que genera una gráfica con un incremento en el tamaño de la letra, de 18 en las marcas y de 24 en los títulos de los ejes, así como negrita en los títulos:

Cambiar Tamaño de Letra de la Leyenda

En la leyenda, se tiene el texto en su título y las series de datos. Se puede cambiar con la siguiente instrucción:

m1 + theme(legend.title = element_text(colour="orange", size=22, face= "bold"), legend.text = element_text(colour= "blue", size = 18, face = "bold"))

Otras alternativas de edición de la leyenda se pueden encontrar en:

http://www.cookbook-r.com/Graphs/Legends_(ggplot2)/

Cambiar Tamaño de Letra a Cintilla de Paneles

La siguiente figura es de capturas de escarabajos estercoleros.

Puesto que el campo (= columna) mes M es numérico, hay que convertirlo a carácter:

mcol$Mes<- factor(mcol$Mes)

Ahora se puede construir la gráfica:

c1<- ggplot(mcol, aes(Mes, Conteo ,fill= Especies)) + geom_bar(stat= 'identity') + facet_grid(.~Trat)

Para cambiar el tamaño de letra, usar strip.text.x, en adición, se cambia el color del texto:

c1 + theme(strip.text.x = element_text(size = 18, colour = "black"))

Observe que la instrucción anterior se refiere a la cintilla cuando los paneles están lado a lado, si los paneles están apilados verticalmente hay que emplear strip.text.y. Alternativamente, se puede escribir la instrucción strip.text para hacer cambios en las cintillas vertical y horizontal simultáneamente.

Modificar Tipo de Letra (=FUENTE)

Para llevar a cabo esta instrucción, es necesario instalar unos paquetes adicionales. El paquete es extrafont. Las instrucciones para su instalación se encuentran en las siguientes ligas:

https://cran.r-project.org/web/packages/extrafont/README.html

http://blog.revolutionanalytics.com/2012/09/how-to-use-your-favorite-fonts-in-r-charts.html

http://www.fromthebottomoftheheap.net/2013/09/09/preparing-figures-for-plos-one-with-r/

En el proceso de instalación, es recomendable seguir el proceso paso a paso, esencialmente es:

install.packages('extrafont')

Despues debe de importar los fonts de su PC a una lista provisional, este paso lleva algunos minutos mientras R busca los fonts en su PC y los carga en memoria:

font_import()

El siguiente paso es registrar los tipos de letra en la base de datos:

loadfonts()

Los pasos anteriores los debe de ejecutar en la primera sesión. En las sesiones posteriores es suficiente con que habilite el paquete.

Para ver los fonts registrados puede escribir:

fonts()

Si desea usarlo, debe usar la función theme(text=element_text(family=""))

La siguiente figura se generó con las siguientes instrucciones. Observe que se usa factor() dentro de ggplot() para convertir los tratamientos= vmaiz a cadenas de caracteres.

mz1<- ggplot(mzdbca, aes(factor(VMaiz), Rend)) + geom_boxplot(outlier.shape= NA, size=1, fill= "#FFCC00") + geom_jitter(size= 6, alpha= 0.5) + theme_bw() + labs(x= "VARIEDAD", y="RENDIMIENTO") + theme(panel.grid = element_blank())

Los tipos de letras dependen de los que se presenten en su sistema operativo de Windows. Uds. puede ver los fonts en el Panel de Control -> Fuentes:

En el siguiente ejemplo, se empleó Berlin Sans FB, con un tamaño de letra 20:

mz1 + theme(text=element_text(family="Berlin Sans FB",size=20))

NOTA: Es posible que no todos los tipos de letra presentes en su PC se puedan desplegar, es importante que ud. verifique visualmente la salida.