Fixing errors in M1.10 and F1.4, add reproducible code

map-info/F1_4_valid.qmd

@@ -11,4 +11,4 @@ execute:
 ---
 
 {{< include _valid_map_info.qmd >}}
-{{< include _valid_maps_database.qmd >}}
+{{< include _valid_maps_database.qmd >}}

map-info/M1_10_valid.qmd

@@ -14,5 +14,4 @@ execute:
 ---
 
 {{< include _valid_map_info.qmd >}}
-
 {{< include _valid_maps_database.qmd >}}

map-info/T1_3_valid.qmd

@@ -12,3 +12,5 @@ execute:
 
 {{< include _valid_map_info.qmd >}}
 {{< include _valid_maps_database.qmd >}}
+
+<script src="https://gist.github.com/jrfep/0ec53645edaf7c14de7b847e2856e353.js"></script>

map-info/_valid_maps_database.qmd

@@ -196,6 +196,30 @@ for (j in seq(along = maps_available$map_code)) {
 
 Note that you need to login to some services like [mapbox](https://www.mapbox.com){target="links"} or [earthengine](https://earthengine.google.com){target="links"}, and in some cases you also need to request access to the files.
 
+### Reproducible code
+
+```{r}
+#| results: asis
+#| eval: true
+mscripts <- maps_available |> 
+    inner_join(map_files, by = c("map_code", "map_version")) |>
+    filter(grepl("gist.github", map_script))
+if (nrow(mscripts)>0) {
+    cat("Code to reproduce the maps from the source datasets is available in following gist:\n\n")
+    mscripts <- mscripts |>
+        mutate(link = sprintf(":::{.}\n<script src=\"%s.js\"></script>\n:::", 
+            map_script)) |>
+        distinct(link) |>
+        pull()
+    for (mscript in mscripts) {
+        cat(mscript)
+    }
+} else {
+    cat("Code to reproduce the maps from the source datasets is not available at the moment.")
+}
+
+```
+
 ###  License information
 
 Indicative maps have been released with a ![](https://zenodo.org/static/icons/licenses/cc-by-icon.svg){height=20} Creative Commons Attribution 4.0 International license. 

styles.css

@@ -1 +1,10 @@
 /* css styles */
+
+/* https://github.com/lonekorean/gist-syntax-themes */
+@import url('https://cdn.rawgit.com/lonekorean/gist-syntax-themes/d49b91b3/stylesheets/solarized-dark.css');
+
+@import url('https://fonts.googleapis.com/css?family=Open+Sans');
+body {
+  margin: 20px;
+  font: 16px 'Open Sans', sans-serif;
+}