Mapa interativo de pontos de coleta — plot

Gera um mapa Leaflet com os pontos de coleta que possuam coordenadas de latitude e longitude validas. Mostra informacoes adicionais no popup.

Usage

plot_map(
  data,
  popup_cols = NULL,
  cluster = TRUE,
  color_by = NULL,
  tiles = "OpenStreetMap"
)

Arguments

data: Um data.frame contendo as colunas de coordenadas. Sao aceitos nomes "latitude"/"longitude" ou "lat"/"lon".
popup_cols: Vetor de colunas a exibir no popup (ex.: c("rio","ponto","data","iqa")). Se NULL, usa colunas comuns se existirem.
cluster: Agrupar marcadores proximos (TRUE/FALSE). Default = TRUE.
color_by: Nome de coluna para colorir os pontos (opcional). Se for "iqa", aplica classes de qualidade da agua.
tiles: Provedor de tiles (default = "OpenStreetMap").

Value

Objeto htmlwidget (mapa Leaflet).

Examples

df <- data.frame(
  rio = c("Buranhem","Chamagunga"),
  ponto = c("P1","P2"),
  data = as.Date(c("2025-09-20","2025-09-21")),
  latitude = c(-16.435, -16.498),
  longitude = c(-39.062, -39.080),
  iqa = c(72, 58)
)
plot_map(df, popup_cols = c("rio","ponto","data","iqa"), color_by = "iqa")