In gdauby/conrappli: Web Interface for 'ConR' package

knitr::opts_chunk$set(echo = FALSE)

Distribution of threatened plant species in `r params$country`

occdata <- params$data
categories <- params$categories

bbox_country <- get_bbox_country(params$country)

if (identical(params$type_map, "grid")) {

  draw_map_grid(occdata, bbox_country = bbox_country, resolution = params$resolution, 
                categories = categories)

} else if (identical(params$type_map, "occ")) {

  draw_map_occ(occdata, bbox_country = bbox_country,
                categories = categories)


}