# NOT RUN {
dm_nycflights13() %>%
dm_draw()
dm_nycflights13(cycle = TRUE) %>%
dm_draw(view_type = "title_only")
head(dm_get_available_colors())
length(dm_get_available_colors())
dm_nycflights13() %>%
dm_get_colors()
# }
Run the code above in your browser using DataLab