mirror of
https://github.com/kidwellj/mapping_environmental_action.git
synced 2024-10-31 23:42:20 +00:00
added wilderness specific script, extra poi
This commit is contained in:
parent
659e32e38b
commit
16ed7fcd9b
|
@ -378,7 +378,7 @@ coordinates(poi_pubs) <- c("x", "y")
|
|||
proj4string(poi_pubs) <- proj4string(admin_lev1)
|
||||
# filter out non-Scottish pubs
|
||||
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}
|
||||
|
|
Loading…
Reference in a new issue