kidwellj/mapping_environmental_action
1
0
Fork 0
mirror of https://github.com/kidwellj/mapping_environmental_action.git synced 2025-01-10 07:42:20 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'master' of https://github.com/kidwellj/mapping_environmental_action

Browse source
This commit is contained in:
Jeremy Kidwell 2019-02-05 08:42:57 +00:00
parent a95ecdbe2f ac9e3c8ef1
commit fd98ba4287
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
mapping_draft.Rmd
View file

@ -887,6 +887,16 @@ unzip("data/National_Forest_Inventory_Woodland_Scotland_2017.zip", exdir = "data
forest_inventory <- st_read("data/National_Forest_Inventory_Woodland_Scotland_2017.shp")
forest_inventory_sp <- readOGR("./data", "National_Forest_Inventory_Woodland_Scotland_2017")
# Download data for scenic areas
# https://opendata.arcgis.com/datasets/d7f6b987c7224a72a185ce012258d500_23.zip
# International Union for Conservation of Nature (IUCN), Category V Protected Landscapes
# for England: https://environment.data.gov.uk/DefraDataDownload/?mapService=NE/AreasOfOutstandingNaturalBeautyEngland&Mode=spatial
download.file("https://opendata.arcgis.com/datasets/d7f6b987c7224a72a185ce012258d500_23.zip", destfile = "data/ScenicAreas.zip")
unzip("data/ScenicAreas.zip", exdir = "data")
scenicareas <- st_read("data/ScenicAreas.shp")
scenicareas_sp <- readOGR("./data", "ScenicAreas")
# Set symmetrical CRS for analysis below
st_crs(sssi) <- 27700
st_crs(ecs_sf) <- 27700