Converts a nested list of palette choices into a single-level named list where each entry is a character vector of colors.
Examples
pal_lookup <- flatten_palette_options(default_palettes()[["choices"]])
head(names(pal_lookup))
#> [1] "dittoColors" "dittoColors_full" "ggplot2" "viridis"
#> [5] "magma" "inferno"