Colour

For more theme and scale, we can look at [http://rpackages.ianhowson.com/cran/ggthemes/] # COLOUR In order to use colour in an effective way in R, we can base on the existing set of colour in R. Colour can be stored by the number or by name. To get the number and colour, we can use the show_col() function in package scales See bellow:

require(ggplot2)

## Loading required package: ggplot2

require(ggthemes)

## Loading required package: ggthemes

require(scales)

## Loading required package: scales

#
palette_default <- c("#7cb5ec", "#434348", "#90ed7d", "#f7a35c", "#8085e9", "#f15c80", "#e4d354", "#8085e8", "#8d4653", "#91e8e1")
palette_darkunica <- c("#2b908f", "#90ee7e", "#f45b5b", "#7798BF", "#aaeeee", "#ff0066", "#eeaaee", "#55BF3B", "#DF5353", "#7798BF", "#aaeeee")
show_col(palette_default)

show_col(palette_darkunica)

show_col(few_pal()(7)) 

show_col(few_pal("dark")(7))  

show_col(few_pal("light")(7))  

show_col(calc_pal()(12))  

show_shapes(calc_shape_pal()(15))  

show_col(colorblind_pal()(8))    

show_col(economist_pal()(6))  

show_col(economist_pal(fill=TRUE)(6))  
show_col(economist_pal(stata=TRUE)(16))  

## Warning: This manual palette can handle a maximum of 15 values. You have
## supplied 16.

# Colour in excel
show_col(excel_pal()(8))  

## Warning: This manual palette can handle a maximum of 7 values. You have
## supplied 8.

show_col(excel_pal('fill')(8))  

## Warning: This manual palette can handle a maximum of 7 values. You have
## supplied 8.

show_col(excel_pal('new')(10))  

show_col(few_pal()(7))  

show_col(few_pal("dark")(7))  

show_col(few_pal("light")(7))  

show_col(fivethirtyeight_pal()(3))     # have only3

show_col(gdocs_pal()(20))  

# Strata colour
show_col(stata_pal("s2color")(15))  

show_col(stata_pal("s1rcolor")(15))  

show_col(stata_pal("s1color")(15))  

show_col(stata_pal("mono")(15))  

#Tableau colour
show_col(tableau_color_pal('tableau20')(20))  

show_col(tableau_color_pal('tableau10')(10))  

show_col(tableau_color_pal('tableau10medium')(10))  

show_col(tableau_color_pal('tableau10light')(10))  

show_col(tableau_color_pal('colorblind10')(10))  

show_col(tableau_color_pal('trafficlight')(10))  

show_col(tableau_color_pal('purplegray12')(12))  

show_col(tableau_color_pal('bluered12')(12))  

show_col(tableau_color_pal('greenorange12')(12))  

show_col(tableau_color_pal('cyclic')(20))  

# Tableau colour ingradient. First define value ò x
x <- seq(0, 1, length = 25)  
show_col(tableau_seq_gradient_pal('Red')(x))  

show_col(tableau_seq_gradient_pal('Blue')(x))  

show_col(tableau_seq_gradient_pal('Purple Sequential')(x))  

# SHAPE and LINE TYPE To get the list of shape in R

df <- data.frame(x=c(1:25), y <-c(1:25))
plot(df$x, df$y, pch=1:25, cex=2, col="red", bg="blue")

ggplot(data=df, aes(x,y))+geom_point(shape=1:25, size=4, fill="red")

# Get the list of line type
ggplot() + geom_hline(yintercept=1:6, colour=1:6, linetype=1:6, size=2 )