static map ex3

Former-commit-id: 935c5f664f01fb8d5c1f0eee7ea4e0d41f8c96ed

Author: Nowosad

09-mapping.Rmd

@@ -786,8 +786,7 @@ africa = world %>%
 We will also use `zion` and `nlcd` datasets from **spDataLarge**:
 
 ```{r, results='hide'}
-zion = st_read((system.file("vector/zion.gpkg", package = "spDataLarge"))) %>% 
-  st_transform(4326)
+zion = st_read((system.file("vector/zion.gpkg", package = "spDataLarge")))
 ```
 
 1. Create a map of the Human Development Index (`HDI`) of the `africa` dataset.
@@ -815,7 +814,9 @@ sm2 = tm_shape(africa) + tm_polygons(col = "subregion",
                                palette = "Set2")
 tmap_arrange(sm2, sm1)
 ```
-<!-- static map 3 -->
+1. Create a land cover map of the Zion National Park.
+Try to manually change the default colors to match your perception of the land cover categories.
+Finally, add and arrange a scale bar and north arrow.
 ```{r, eval=FALSE, echo=FALSE}
 lc_colors = c("#476ba0", "#aa0000", "#b2ada3", "#68aa63", "#a58c30",
               "#c9c977", "#dbd83d", "#bad8ea")