Using the geoserver to visualise the layer

The WMS layers on the Geoserver allow the layer to be safely included in a Web map for visualisation. Pictures of the layers are rendered at the approriate scale. However you don-t actually have the data. There are three layers in this map. Priority habitat, SSSIs and the landcover 2015.

library(giscourse)
conn<-connect()
qmap() %>% uk_wms() %>% addFullscreenControl()

Getting the data

To get the data around a Gecoded point use dquery.

query = "select * from lcm2015gbvector"
lcover<-st_zm(dquery("Arne, Dorset", 3000, query=query)) 

Now a mapview can be built.

library(RColorBrewer)
library(dplyr)
pal<-brewer.pal(12, "Paired")
alpha=40
lcover %>% select("bhab", "geom") %>% mapview(zcol="bhab",col=pal, col.regions = pal,legend = FALSE,alpha.regions=alpha/100) %>% extras()