#' @importFrom magrittr %>%
#' @export
magrittr::`%>%`
is_geometry <- function(x) {
inherits(x, "sfc")
}
is_crs <- function(x) {
inherits(x, "crs")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.