#' @export geom_if <- function(data, ...) { if(missing(data)) return(NULL) if(nrow(data) ==0) return(NULL) return(ggplot2::geom_sf(data=data, ...)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.