Displaying 2 results from an estimated 2 matches for "addtiles".
Did you mean:
addfiles
2018 Feb 23
0
Mapedit::selectMap in shiny map.
...t work out how
to incorporate the selectMap() in the shiny app. An error is returned:
Here is some toy code showing the code in using leaflet locally:
library(mapedit)
library(leaflet)
options(stringsAsFactors = F)
bounds <- c(5.956063, 10.49511, 45.81706, 47.80848 )
lf <- leaflet() %>%
addTiles()%>%
addPolygons(data =gadmCHE,
label = ~NAME_1,
layerId = ~NAME_1)
selected <-selectMap(lf)
##the above works fine and returns a dataframe giving the ids of the
selected polygons.
##however the code below - trying to implement in shiny fails with "Can?t
call runApp() from within runA...
2018 Jan 19
1
Leaflet maps. Nudging co-incident markers
...39;Cafe','Library','Cafe')
n=c('North St Gallery','Gallery cafe', 'South St Library', 'Coffee 2 go')
d<-data.frame(idno,x,y,cat,n)
#get a map and zoom into approx area of interest
m=leaflet()%>% setView(lng = -1.935, lat=52.485, zoom=12)
m=addTiles(m)
m
#create groups of objects
c= subset(d,cat=="Cafe")
l= subset(d, cat=="Library")
g= subset(d, cat=="Gallery")
#add markers
m=addCircleMarkers(m,
lng = c$x,
lat = c$y,
popup = c$n,...