An eight-color colorblind friendly qualitative discrete palette that is based on colors on the Duke branding guidelines.
Examples
duke_pal()
#> function (n)
#> {
#> n_values <- length(values)
#> if (n > n_values) {
#> warning("This manual palette can handle a maximum of ",
#> n_values, " values. You have supplied ", n, ".",
#> call. = FALSE)
#> }
#> unname(values[seq_len(n)])
#> }
#> <bytecode: 0x56017a6be268>
#> <environment: 0x56017a6bd900>
#> attr(,"max_n")
#> [1] 8