Ошибка при построении карт с использованием ggmap

Question

Пока я пытался использовать код ниже, я получаю следующее сообщение об ошибке. сообщение

my.Map <- get_map(location ="Singapore",source = "osm",zoom = 10) 
ggmap(my.Map) 

Ошибки:

Ошибка в zero_range (от): х должно быть длина 1 или 2

Я попробовал то же самое с несколькими примерами и перегрузкой пакета, я я не могу понять, как это решить, поскольку он включает в себя только запрос карт Google и их построение.

Ниже мой sessionInfo

R version 3.3.0 (2016-05-03) Platform: x86_64-apple-darwin13.4.0 (64-bit) Running under: OS X 10.11.5 (El Capitan) 

locale: [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8 

attached base packages: [1] stats  graphics grDevices utils  datasets methods base  

other attached packages: [1] ggmap_2.6.1  ggplot2_2.1.0.9001 

loaded via a namespace (and not attached): [1] Rcpp_0.12.7  plyr_1.8.4  tools_3.3.0  digest_0.6.10  [5] evaluate_0.9  tibble_1.2  gtable_0.2.0  lattice_0.20-34 [9] png_0.1-7   shiny_0.14  rstudioapi_0.6 mapproj_1.2-4  [13] yaml_2.1.13  proto_0.3-10  stringr_1.1.0  knitr_1.14  [17] RgoogleMaps_1.4.1 maps_3.1.1 grid_3.3.0  R6_2.1.3   [21] jpeg_0.1-8  rmarkdown_1.1  bookdown_0.1  sp_1.2-3   [25] reshape2_1.4.1 magrittr_1.5  scales_0.4.0.9003 htmltools_0.3.5 [29] assertthat_0.1 mime_0.5   xtable_1.8-2  colorspace_1.2-6 [33] geosphere_1.5-5 httpuv_1.3.3  labeling_0.3  stringi_1.1.1  [37] miniUI_0.1.1  lazyeval_0.2.0 munsell_0.4.3  rjson_0.2.15 

Описание my.Map

str(my.Map) 
chr [1:607, 1:607] "#F2EFE9" "#F2EFE9" "#F2EFE9" "#F2EFE9" "#F2EFE9" ... 
- attr(*, "class")= chr [1:2] "ggmap" "raster" 
- attr(*, "bb")='data.frame': 1 obs. of 4 variables: 
..$ ll.lat: num 0.912 
..$ ll.lon: num 103  ..$ ur.lat: num 1.79 
..$ ur.lon: num 104 
- attr(*, "source")= chr "osm" 
- attr(*, "maptype")= chr "openstreetmap" 
- attr(*, "scale")= num 575000 

Answer 1

Проблема, кажется, с открытой Street Map (osm). ?get_openstreetmap предоставит вам более подробную информацию о проблеме.

получает сообщение об ошибке из файла загрузки.tw с сообщением HTTP status '503 Service Unavailable'. Вы можете подтвердить это, установив urlonly = TRUE, а затем введите URL-адрес в веб-браузере. решение - либо (1) изменить источники, либо (2) дождаться возврата серверов OSM.

Если вы немного измените свой код, чтобы использовать Google как источник, он будет работать.

my.Map <- get_map(location ="Singapore",source = "google") 
ggmap(my.Map)