coords <- c(37.3615593, -122.0553238)
geo_to_h3(coords) %>%
k_ring(3) %>%
h3_set_to_multi_polygon() %>%
geo_boundary_to_sf() %>%
plot()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.