data-raw/key_biodiversity_areas.R
In mapme-initiative/mapme.biodiversity: Efficient Monitoring of Global Biodiversity Portfolios
library(sf)
aoi <- system.file("extdata", "shell_beach_protected_area_41057_B.gpkg",
package = "mapme.biodiversity")
aoi <- read_sf(aoi)
sf_use_s2(FALSE)
aoi <- suppressWarnings(
st_simplify(st_buffer(aoi, dist = -0.01), dTolerance = 0.001)
)
sf_use_s2(TRUE)
aoi [, 1:4] <- NULL
outdir <- "inst/res/key_biodiversity_areas"
dir.create(outdir, recursive = TRUE, showWarnings = FALSE)
write_sf(aoi, file.path(outdir, "kbas.gpkg"))
mapme-initiative/mapme.biodiversity documentation built on April 5, 2025, 12:47 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(sf)
aoi <- system.file("extdata", "shell_beach_protected_area_41057_B.gpkg",
package = "mapme.biodiversity")
aoi <- read_sf(aoi)
sf_use_s2(FALSE)
aoi <- suppressWarnings(
st_simplify(st_buffer(aoi, dist = -0.01), dTolerance = 0.001)
)
sf_use_s2(TRUE)
aoi [, 1:4] <- NULL
outdir <- "inst/res/key_biodiversity_areas"
dir.create(outdir, recursive = TRUE, showWarnings = FALSE)
write_sf(aoi, file.path(outdir, "kbas.gpkg"))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.