Edicion. Colores
Libreria
ggplot2
Archivos
ratas.csv, son el resultado de varios tratamientos tendientes al control de la rata cañera, registrado sobre individuos machos y hembras. Se registró el peso de los individuos como variable respuesta.
diatemps.csv, son lecturas durante un años de las temperaturas minimas, medias y maximas en Tepetates, Veracruz.
apisumv.csv, son los tiempos de desarrollo de los primeros cuatro ínstares ninfales de Acyrthosiphon pisum (Lopez-Collado, J. 1990. Tasas de desarrollo, supervivencia y reproduccion, y factores de mortalidad de Acyrthosiphon pisum (Homoptera: Aphididae) en alfalfa. Tesis M.C. Colegio de Postgraduados. Mexico)
sismos.csv, son los registros de algunos sismos en la República Mexicana (consultado del servicio sismológico nacional). Contiene varios campos, entre ellos la localizacion (longitude, latitude), la profundidad de registro del sismo y su magnitud, asi como la fecha del sismo.
Los archivos se encuentran aquí:
https://sites.google.com/site/digitcognem/workfiles
Cambiar Colores de Manera Personal. scale_fill_manual(), scale_colour_manual()
Las escalas para cambiar los colores son scale_fill_manual() que se aplica a gráficas de barras y cajas, entre otras y scale_colour_manual(), que se aplica a los puntos.
La figura siguiente muestra los datos de ratas.
Las instrucciones son las siguientes:
rat1<- ggplot(ratas,aes(producto, peso, fill=sexo)) + geom_boxplot(outlier.shape = NA, size= 1)
En este caso, fill= sexo es la opción para colorear las cajas. Puesto que son dos tipos de sexo (Hembra y Macho), los colores personales deben ir en una lista en ese orden:
rat1 + scale_fill_manual(values= c("#FF66B3", "#B8B8B8"))
Se utiliza scale_fill_manual(), y values es la lista de los colores requeridos para los niveles que contiene fill= sexo, en este caso 2. Los colores en código hexadecimal se extrajeron del sitio:
Si la coloración original es por producto:
rat2<- ggplot(ratas,aes(sexo,peso, fill=producto)) + geom_boxplot(outlier.shape = NA, size= 1)
Para cambiar los colores de fill= producto, se emplea la escala manual:
rat2 + scale_fill_manual(values= c("#6666FF", "#66E6FF", "#B399CC","#CC9933", "#CC4D33", "#D60047"))
En el caso de puntos, se emplea scale_colour_manual():
points6<-ggplot(apisumv,aes(TEMP,DIAS)) + geom_line(aes(colour= INSTAR), size=1) + geom_point(aes(colour= INSTAR), size=8) + scale_colour_manual(values= c("#FF0000", "#80FF00", "#FF00FF", "#0080FF", "#FF7A7A")) + theme_classic()
Lo cual genera que tanto las lineas como los puntos sean pintados con la escala de colores manual.
Cambiar a un Solo Color
Si queremos aplicar un solo color, la siguiente instrucción funciona cuando hay un solo factor:
rat3<- ggplot(ratas,aes(producto, peso)) + geom_boxplot(outlier.shape = NA, size= 1, fill= '#488E48')
En el caso de que se tengan dos o mas factores, se puede emplear una escala manual con el mismo valor de color repetido en todas las casillas.
Para el caso de puntos se emplea la opción colour:
t1<- ggplot(diatemps,aes(MIN, MEDIA)) + geom_point(shape= 15, colour='#4E00EB', size= 6) + theme_linedraw()
Cambiar Colores con Escalas Prediseñadas. scale_fill_brewer()
La función scale_fill_brewer() tiene una lista extensa de paletas de colores que se pueden aplicar a valores nominales o numéricos. Por ejemplo:
rat4<- ggplot(ratas, aes(sexo, peso, fill= producto)) + geom_boxplot(outlier.shape = NA, size= 1) + scale_fill_brewer(palette= 'Set1')
Una descripción de las paletas se puede encontrar en el siguiente sitio:
http://www.cookbook-r.com/Graphs/Colors_(ggplot2)/
En el caso de gráficas de punto y linea, la opción no es fill, sino colour. Para agrupar las categorías, se emplea group, observe que aes(colour=INSTAR) se encuentra como parte de la estética en las lineas y en los puntos:
points1<-ggplot(apisumv,aes(TEMP, DIAS, group= INSTAR)) + geom_line(aes(colour= INSTAR), size=1) + geom_point(aes(colour= INSTAR), size=8)
Para cambiar el color de lineas y puntos, se puede aplicar la escala scale_colour_brewer(), equivalente al scale_fill_brewer, en este ejemplo se emplea otra paleta de colores:
points2<-ggplot(apisumv,aes(TEMP,DIAS, group=INSTAR)) + geom_line(aes(colour=INSTAR), size=1) + geom_point(aes(colour= INSTAR), size=8) + scale_colour_brewer(palette= 'Spectral')
Cambiar Colores con Escalas Prediseñadas. scale_colour_gradient()
Esta escala de colores es para valores continuos, así que se suele aplicar a gráficas de puntos. Las instrucciones de la siguiente figura son:
sis1<- ggplot(sismos,aes(longitude, latitude, Magnitud)) + geom_point(aes(colour= Depth_km), size= 4, alpha= 0.5) + scale_colour_gradient(low= 'yellow', high='red') + theme_linedraw()
La clave es que para colorear los puntos en geom_point(aes(colour=Depth_km)) se pide a ggplot emplear la profundidad como variable para colorear los sismos. Adicionalmente, se emplea la escala scale_colour_gradient() donde se incluyen los valores iniciales y finales del gradiente.
