Clase 3-Color pallete

library(ggplot2)
library(GGally)

## Registered S3 method overwritten by 'GGally':
##   method from   
##   +.gg   ggplot2

colPalette <- c("#FCFF33","#3F33FF","#FF3342")

resumen <- ggplot(iris, aes(Sepal.Length, Sepal.Width))
resumen <- resumen + geom_boxplot(aes(group=Species, fill=Species, alpha=0.3)) 
resumen <- resumen + geom_point(aes(color=Species, alpha=0.3))
resumen <- resumen + facet_grid(.~Species)
resumen <- resumen + scale_fill_manual(values=colPalette)
resumen <- resumen + scale_color_manual(values=colPalette)

resumen

plot <- ggparcoord(iris,
                   columns=c(1:4),
                   showPoints=TRUE,
                   groupColumn = 'Species')
plot <- plot + scale_color_manual(values = colPalette)
plot

plot <-plot + facet_grid(Species~.)
plot