Я использую пакет R ggmap.
?get_map
говорит:
местоположение: адрес, пара долгота/широта (в указанном порядке) или левая/нижняя/правая/верхняя ограничивающая рамка
Мой код:
library(ggmap)
library(mapproj)
lat_bottom = 52.33 # bottom latitude of Berlin
lat_top = 52.5 # top latitude of Berlin
lon_left = 13.0 # left longitude of Berlin
lon_rigth = 13.95 # right longitude of Berlin
mymap <- get_map(location = c(lon_left,lat_bottom,lon_rigth,lat_top),
source="google")
ggmap(mymap)
Почему это дает мне предупреждение:
Предупреждение: ограничивающая рамка предоставлена Google - пространственная протяженность приблизительна. преобразование ограничивающей рамки в спецификацию центра/масштаба. (экспериментальный)
Значит ли это, что у меня нет возможности создать карту именно с такими углами?
Основываясь на совете ниже, я попробовал это:
lat_bottom = 52.33 # bottom latitude of Berlin
lat_top = 52.68 # top latitude of Berlin
lon_left = 13.08 # left longitude of Berlin
lon_rigth = 13.77 # right longitude of Berlin
mylon = c(lon_left,lon_rigth)
mylat = c(lat_bottom,lat_top)
mymap <- get_map(location = c(lon = mean(mylon), lat = mean(mylat)),
maptype = "roadmap", source = "google", zoom=11) # using zoom
ggmap(mymap)
foo<-ggmap(mymap)+
scale_x_continuous(limits = c(lon_left,lon_right), expand = c(0, 0)) +
scale_y_continuous(limits = c(lat_bottom,lat_top), expand = c(0, 0))
foo
Выглядит нормально. Но когда я беру другие координаты (ближе друг к другу), например, как ниже - то карта выглядит странно - она как бы смещается влево на сером фоне...
lat_bottom = 52.35 # new bottom
lat_top = 52.50 # new top
lon_left = 13.2 # new left
lon_rigth = 13.5 # new right
ggplot2
, вы можете обрезать карту, используяscale_x_continous
иscale_y_continous
. Взгляните на эту ссылку. Это может быть то, что вы после. - person jazzurro   schedule 27.02.2015