In Pakillo/Carex.bipolar: SDM analyses of bipolar Carex species

knitr::opts_chunk$set(echo = TRUE, message = FALSE)
root <- rprojroot::find_rstudio_root_file()

library(rSDM)
library(leaflet)

occs <- as.data.frame(readr::read_csv(file.path(root, "data/locs_30m.csv")))

All species

occmap(occs, bg = 'leaflet', pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

C. macloviana

occmap(occs[occs$species == "macloviana", ], bg = "leaflet", pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

C. magellanica

occmap(occs[occs$species == "magellanica", ], bg = "leaflet", pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

C. microglochin

occmap(occs[occs$species == "microglochin", ], bg = "leaflet", pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

C. canescens

occmap(occs[occs$species == "canescens", ], bg = "leaflet", pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

C. maritima

occmap(occs[occs$species == "maritima", ], bg = "leaflet", pcol = "black") %>%
  addProviderTiles(providers$OpenStreetMap)

Pakillo/Carex.bipolar documentation built on July 27, 2020, 2:09 p.m.