if (FALSE) {
# Get heatmap colors
colors <- goose_suggest_colors("heatmap", n_colors = 9)
# Get brand colors
colors <- goose_suggest_colors("categorical", n_colors = 5, brand = "Block")
# Get accessible colors
colors <- goose_suggest_colors("bar chart", n_colors = 4,
constraints = "colorblind-safe")
}
Run the code above in your browser using DataLab