mirror of
https://github.com/kidwellj/mapping_environmental_action.git
synced 2024-10-31 23:42:20 +00:00
testing hpc version, ctd
This commit is contained in:
parent
c39b197676
commit
a8eee81490
|
@ -481,7 +481,7 @@ admin_barplot <-
|
||||||
|
|
||||||
pdf("figures/03_admin_barplot.pdf")
|
pdf("figures/03_admin_barplot.pdf")
|
||||||
print(admin_barplot)
|
print(admin_barplot)
|
||||||
dev.off()
|
dev.off()
|
||||||
|
|
||||||
```
|
```
|
||||||
|
|
||||||
|
@ -528,16 +528,13 @@ admin_lev2_centralbelt_ecs_plot <-
|
||||||
# Stitch together maps using grid()
|
# Stitch together maps using grid()
|
||||||
vp_admin_lev2_centralbelt_ecs_plot <- viewport(x = 0.5, y = 0.1, height = 6.0/centralbelt_ratio)
|
vp_admin_lev2_centralbelt_ecs_plot <- viewport(x = 0.5, y = 0.1, height = 6.0/centralbelt_ratio)
|
||||||
|
|
||||||
# Save to file
|
|
||||||
tmap_save(admin_lev2_scotland_ecs_plot, filename = "adminlev2_test.png", scale = 0.7, width = 6.125,
|
|
||||||
insets_tm = admin_lev2_centralbelt_ecs_plot,
|
|
||||||
insets_vp = vp_admin_lev2_centralbelt_ecs_plot)
|
|
||||||
|
|
||||||
# plot full map with inset
|
# plot full map with inset
|
||||||
|
|
||||||
tmap_mode("plot")
|
tmap_mode("plot")
|
||||||
admin_lev2_scotland_ecs_plot
|
pdf("figures/03_admin_lev2_scotland_ecs_plot.pdf")
|
||||||
print(admin_lev2_centralbelt_ecs_plot,
|
print(admin_lev2_centralbelt_ecs_plot,
|
||||||
vp = vp_admin_lev2_centralbelt_ecs_plot)
|
vp = vp_admin_lev2_centralbelt_ecs_plot)
|
||||||
|
dev.off()
|
||||||
|
|
||||||
# Second plot, revealing transition towns
|
# Second plot, revealing transition towns
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue