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

added wilderness specific script, extra poi

Browse source
This commit is contained in:
Jeremy Kidwell 2019-03-27 12:23:09 +00:00
parent 659e32e38b
commit 16ed7fcd9b
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
mapping_draft-hpc_optimised_wilderness.Rmd
View file

@ -378,7 +378,7 @@ coordinates(poi_pubs) <- c("x", "y")
proj4string(poi_pubs) <- proj4string(admin_lev1) proj4string(poi_pubs) <- proj4string(admin_lev1)
# filter out non-Scottish pubs # filter out non-Scottish pubs
poi_pubs <- poi_pubs[!is.na(over(poi_pubs, geometry(admin_lev1))),] poi_pubs <- poi_pubs[!is.na(over(poi_pubs, geometry(admin_lev1))),]
poi_pubs_sf <- st_as_sf(poi_pubs_wgs, coords = c("x", "y"), crs=paste0("+init=epsg:",27700)) poi_pubs_sf <- st_as_sf(poi_pubs, coords = c("x", "y"), crs=paste0("+init=epsg:",27700))
``` ```
```{r wilderness_data_prep} ```{r wilderness_data_prep}