From 15e6302472f94cccd1f119a3d3e3ab16c5216918 Mon Sep 17 00:00:00 2001 From: Jeremy Kidwell Date: Wed, 13 Feb 2019 23:42:43 +0000 Subject: [PATCH] commenting out lines for experimental plots --- mapping_draft.Rmd | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/mapping_draft.Rmd b/mapping_draft.Rmd index 55b6cea..74a2138 100644 --- a/mapping_draft.Rmd +++ b/mapping_draft.Rmd @@ -756,18 +756,18 @@ centralbelt_region = st_bbox(c(xmin = 224479.2, xmax = 642963.5, # Still need to mod above line # Stitch together maps using grid() -library(grid) -nz_height_map -print(nz_map, vp = viewport(0.8, 0.27, width = 0.5, height = 0.5)) +# library(grid) +# nz_height_map +# print(nz_map, vp = viewport(0.8, 0.27, width = 0.5, height = 0.5)) # Generate dynamic plot for exploring # TODO: change basemap -tmap_mode("view") -tm_shape(urbanrural_sf_simplified) + tm_polygons(col = "UR8FOLD", palette = "BrBG") + - tm_shape(ecs_sf) + - tm_dots("red", size = .05, alpha = .4, popup.vars = TRUE) + - tm_view(alpha = 1, basemaps = "Esri.WorldTopoMap") +# tmap_mode("view") +# tm_shape(urbanrural_sf_simplified) + tm_polygons(col = "UR8FOLD", palette = "BrBG") + +# tm_shape(ecs_sf) + +# tm_dots("red", size = .05, alpha = .4, popup.vars = TRUE) + +# tm_view(alpha = 1, basemaps = "Esri.WorldTopoMap") ```