ggplot2
Personalización de ejes, títulos y leyendas.

Introducción

Cambiar el título de la leyenda y aumentar el tamaño de las claves.

# load the library
library(ggplot2)

# create a blank canvas
g <- ggplot(data = diamonds)

g + geom_bar(aes(x = cut, fill = cut)) + 
    scale_fill_discrete(guide = guide_legend(title = "CUT", 
                                             keywidth = 2, 
                                             keyheight = 2))

Compara frecuencias entre grupos y elimina el título de leyenda

g + geom_bar(aes(x = cut, fill = color), position = "fill") + 
    guides(fill = guide_legend(title = NULL))

Coloque los objetos superpuestos uno junto al otro y cambie los colores de los textos de los ejes

g + geom_bar(mapping = aes(x = cut, fill = clarity), position = "dodge") +
    theme(axis.text = element_text(colour = "red", size = 12))

Afinación de los ejes, tics, textos y títulos.

 g + geom_histogram(aes(price, fill = cut), binwidth = 500) + 
    labs(x = "Price", y = "Number of diamonds", 
         title = "Distribution of prices \n across Cuts") + 
    theme(plot.title = element_text(colour = "red", face = "italic"),
        axis.title.x = element_text(face="bold", 
                                      colour="darkgreen", size = 12),
      axis.text.x  = element_text(angle = 45, vjust = 0.5, size = 12), 
      axis.title.y = element_text(face="bold", 
                                  colour="darkblue", size = 12),
      axis.text.y  = element_text(size = 12, colour = "brown"))