Nothing
## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----setup--------------------------------------------------------------------
library(ozmaps)
## ----ozmap--------------------------------------------------------------------
library(ozmaps)
ozmap()
## ----country------------------------------------------------------------------
ozmap(x = "country")
## ----add-plot-----------------------------------------------------------------
plot(quakes[c("long", "lat")], xlim = c(120, 190))
ozmap(add = TRUE)
## ----sf-format----------------------------------------------------------------
sf_oz <- ozmap_data("states")
print(dim(sf_oz))
print(names(sf_oz))
## ----ochRe--------------------------------------------------------------------
if (utils::packageVersion("paletteer") < '1.0.0') {
pal <- paletteer::paletteer_d(package = "ochRe", palette = "namatjira_qual")
} else {
pal <- paletteer::paletteer_d(palette = "ochRe::namatjira_qual")
}
opal <- colorRampPalette(pal)
ozmap("abs_ced", col = opal(nrow(abs_ced)))
ozmap("abs_ste", col = opal(nrow(abs_ste)))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.