dnme-minturdep / comunicacion

Paquete de R con herramientas para la comunicación institucional de la DNMyE
https://dnme-minturdep.github.io/comunicacion/
GNU General Public License v3.0
4 stars 6 forks source link

Resolver lugar de los grises en paleta de colores #14

Open pablotis opened 2 years ago

pablotis commented 2 years ago

Opción 1: Pasar grises al centro de la paleta:


  paletas <- list(

    `c2_continuo`  = c("#50B8B1", "#9283BE"),
    `c2_contraste` = c("#50B8B1", "#EE3D8F"),
    `c10_todos`     = c("#EE3D8F", "#F7941E", "#FFD100", "#D7DF23", "#AAAAAA", "#E7E7E7", "#50B8B1",
                        "#9283BE", "#37BBED", "#50535C"))

  #rlang::check_installed("grDevices", reason = "Para usar `dnmye_paletas()`")

  pal <- paletas[[palette]]

  if (reverse) pal <- rev(pal)

  grDevices::colorRampPalette(pal, ...)
}

Opción 2: sacar grises de la paleta C10_todos:


  paletas <- list(

    `c2_continuo`  = c("#50B8B1", "#9283BE"),
    `c2_contraste` = c("#50B8B1", "#EE3D8F"),
    `c8_todos`     = c("#EE3D8F", "#F7941E", "#FFD100", "#D7DF23", "#50B8B1",
                        "#9283BE", "#37BBED", "#50535C"))

  #rlang::check_installed("grDevices", reason = "Para usar `dnmye_paletas()`")

  pal <- paletas[[palette]]

  if (reverse) pal <- rev(pal)

  grDevices::colorRampPalette(pal, ...)
}

Opción 3: Armar dos paletas, una con grises otra sin grises


  paletas <- list(

    `c2_continuo`  = c("#50B8B1", "#9283BE"),
    `c2_contraste` = c("#50B8B1", "#EE3D8F"),
    `c8`     = c("#EE3D8F", "#F7941E", "#FFD100", "#D7DF23", "#50B8B1",
                        "#9283BE", "#37BBED", "#50535C"),
    `c10_todos`     = c("#EE3D8F", "#F7941E", "#FFD100", "#D7DF23", "#AAAAAA", "#E7E7E7", "#50B8B1",
                        "#9283BE", "#37BBED", "#50535C"))

  #rlang::check_installed("grDevices", reason = "Para usar `dnmye_paletas()`")

  pal <- paletas[[palette]]

  if (reverse) pal <- rev(pal)

  grDevices::colorRampPalette(pal, ...)
}
SSoubie commented 2 years ago

Mi productividad aumentó un 200% con estas opciones

pablotis commented 2 years ago

Bien! Cuál te pareció mejor?