check_sf <- function(x){
#check if x is a sf object
if (all(class(x) != "sf")) rlang::abort(tr_("x must be an `sf` object"))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.