From 0497c245a8b2aba5504fb8e6264c3d9d82bb0cbf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Grelot?= <frederic.grelot@irstea.fr>
Date: Mon, 24 Jan 2022 14:15:31 +0100
Subject: [PATCH] =?UTF-8?q?update=20des=20sorties=20th=C3=A9matiques=20en?=
=?UTF-8?q?=20pdf?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
map/map_so_ii.rmd | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/map/map_so_ii.rmd b/map/map_so_ii.rmd
index 123de2d..1080c8f 100644
--- a/map/map_so_ii.rmd
+++ b/map/map_so_ii.rmd
@@ -1,3 +1,4 @@
+
```{r library}
library(sf)
library(geau)
@@ -8,12 +9,13 @@ path = "data-common/figure/so-ii/map/theme/so-ii-%s.pdf"
map_so_ii(theme = "osm", theme_legend = TRUE, path = sprintf(path, "osm"))
map_so_ii(theme = "collectivity", path = sprintf(path, "collectivity"))
-map_so_ii(theme = "collectivity", detail = "syndicate", path = sprintf(path, "syndicate"))
-map_so_ii(theme = "collectivity", detail = "epci", path = sprintf(path, "epci"))
+map_so_ii(theme = "collectivity", theme_legend = TRUE, detail = "syndicate", path = sprintf(path, "syndicate"))
+map_so_ii(theme = "collectivity", theme_legend = TRUE, detail = "epci", path = sprintf(path, "epci"))
map_so_ii(theme = "clc", theme_legend = TRUE, path = sprintf(path, "clc"))
map_so_ii(theme = "population", theme_legend = TRUE, path = sprintf(path, "population"))
+map_so_ii(theme = "population", year = 2018:2019, theme_legend = TRUE, path = sprintf(path, "population-last"))
map_so_ii(theme = "catnat", theme_legend = TRUE, path = sprintf(path, "catnat"))
-map_so_ii(theme = "catchment", theme_legend = TRUE, path = sprintf(path, "catchment"))
+map_so_ii(so_ii_hydro[as.character(so_ii_hydro$degre) <= 1, ], col = scales::colour_ramp(c("white", "blue"))(.5), border = NA, theme = "catchment", theme_legend = TRUE, path = sprintf(path, "catchment"))
map_so_ii(so_ii_hydro[as.character(so_ii_hydro$degre) <= 2, ], col = scales::colour_ramp(c("white", "blue"))(.5), border = NA, theme = "catchment", detail = 2, theme_legend = TRUE, path = sprintf(path, "catchment_sub"))
map_so_ii(theme = "onrn", detail = "freq_sin", theme_legend = TRUE, path = sprintf(path, "freq_sin"))
map_so_ii(theme = "onrn", detail = "cost", theme_legend = TRUE, path = sprintf(path, "cost"))
--
GitLab