library(topogram)
topogram(world, value = "pop_est") %>%
topogram_legend(title = "Population")
topogram(world, value = "pop_est", palette = "Blues") %>%
topogram_legend(
title = NULL,
formatter = scales::label_comma(),
direction = "v"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.