mapview
mapview copied to clipboard
editmap defaults to zoom level 50
I have been using this (perhaps slightly longwinded) code to jump to a location so I can draw a site boundary outline.
library(mapview)
library(mapedit)
library(sp)
library(sf)
##TYPE SITE COORDINATES
lat <- 51.997609
lon <- -2.466003
#put lat lon in format for mapview to jump to
location <- paste0("LINESTRING(", lon, " ", lat,", ", lon, " ", lat, ")")
##create location in sf
location <- st_as_sfc(location
) %>%
st_set_crs(4326)
##jump to site location to draw site boundary
site <- mapview(location, map.types = "OpenStreetMap") %>%
editMap()
However, in the past week or so it has defaulted to zoom level 50 meaning I have to spend about 20 seconds manually zooming out.
Any thoughts?