remove unknown species

BiodiversiteQuebec · Feb 22, 2024 · 294a5c9 · 294a5c9
1 parent ec3cb44
commit 294a5c9
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/hist_biodiv.qmd b/hist_biodiv.qmd
@@ -8,9 +8,11 @@ title: "Histoire de biodiversité"
 
 # Load data
 SPI_OCC <- read.csv("results/SPI_OCC.csv")
+SPI_OCC <- SPI_OCC[SPI_OCC$SPECIES != "Information masquée",]
 SPI_OCC_2023 <- SPI_OCC[SPI_OCC$YEAR == 2023,]
 
 SPI_RANGES <- read.csv("results/SPI_ranges.csv")
+SPI_RANGES <- SPI_RANGES[SPI_RANGES$SPECIES != "Information masquée",]
 SPI_RANGES_2023 <- SPI_RANGES[SPI_RANGES$YEAR == 2023,]
 
 ```

diff --git a/scr/data_n_figures_visual.r b/scr/data_n_figures_visual.r
@@ -57,6 +57,8 @@ aires_latlon$POPINFOS <- paste0(
 
 # SPI <- read.csv("./results/RANGES/SPI.csv")
 SPI <- read.csv("./results/SPI_ranges.csv")
+# Remove unknown species
+SPI <- SPI[SPI$SPECIES != "Information masquée", ]
 # error in species names
 SPI$SPECIES[SPI$SPECIES == "Lyn rufus"] <- "Lynx rufus"
 species <- as.character(unique(SPI$SPECIES))