He escrito una función que devuelve un vector de nombres de colores:

<code>custom.colors <- function(n) {
  palette <- c("dodgerblue1", "skyblue4", "chocolate1", "seagreen4",
               "bisque3", "red4", "purple4", "mediumpurple3",
               "maroon", "dodgerblue4", "skyblue2", "darkcyan",
               "darkslategray3", "lightgreen", "bisque",
               "palevioletred1", "black", "gray79", "lightsalmon4",
               "darkgoldenrod1")
  if (n > length(palette))
    warning('palette has duplicated colours')
  rep(palette, length.out=n)
}
</code>

Me gustaría que ggplot use la función anterior para generar la paleta por defecto. Tal vez sólo para escalas discretas. Utilizandoscale_manual() Cada vez es demasiado arrastre. ¿Es posible?