如何从地图上消除灰色区域和南极洲？

Question

我不知道如何从地图中消除两个区域：南极洲和出现在图像顶部，右侧和左侧的灰色区域。

我在这里尝试了几乎所有答案，但是在某些情况下，执行代码后出现的结果与答案甚至不一样，我的猜测是在某些情况下答案有些过时，并且原始功能在更改后5或6年。

gc <- geocode('spain')
center <- as.numeric(gc) 
map <- get_map(location = center, source="stamen", zoom=1)
ggmap(map)

这是创建世界地图的原始代码。我想设定限制以避免所有灰色部分和南极洲。

如果我将缩放比例更改为2，我将失去澳大利亚。

实际结果：

预期结果：

Answer 1

 cities <- c('usuahia','alaska','new_zealand','greenland_sea')
 lat <- c(-54.80191, 64.20084, -27.46977,77.870977)
 lon <- c(-68.3030, -149.49367, 153.025124,-5.650146)
 limits <- data.frame(cities,lat,lon)

 mbound <- c(min(limits$lon), #min/max longitude/latitude to display on the map
         min(limits$lat),
         max(limits$lon),
         max(limits$lat))

 worldmap <- get_stamenmap(bbox=mbound, zoom = 3)

 [![enter image description here][1]][1]ggmap(worldmap)