#pacotes
library(sf)
## Linking to GEOS 3.11.2, GDAL 3.8.2, PROJ 9.3.1; sf_use_s2() is TRUE
library(ggplot2)
library(ggrepel)
library(rmarkdown)
library(ggspatial)
library(patchwork)
knitr::opts_chunk$set(echo = TRUE)
Este mapa foi gerado em função da coleta de dados no Parque Nacional Cerro Cora que é a maior área protegida do Paraguai com 5.538 hectares. O shapefile desta área foi obtido no site https://www.protectedplanet.net/.
paged_table(pontos_data)
# Dados de limites do Cerro
limites_cerro <- data.frame(
xmin = -56.07, xmax = -55.97,
ymin = -22.7, ymax = -22.61)
Criar um objeto sf para o retângulo
Definir o ponto central do retângulo para a anotação
plot2 + plot1 + plot_layout(ncol = 2)