剧情美国地图 - 大白三角。固定。新增功能：地理编码限制为每天2500个请求

Question

在绘制美国地图时，我得到了地图，但中间有一个大的白色三角形。有人看到了相同的吗？

require(ggplot2)
require(ggmap)
require(maps)

US <- map_data("usa", region=".")

plot(ggplot(US, aes(x=long, y=lat)) +
       geom_polygon() +
       coord_map())

上述问题已修复。 现在我想在地图上标记城市的广告/电话/等数量 - 一个4900个地点的数据框。但是，google将非商业用户的使用限制为每天2500。 除了在较小（＆lt; = 2500）行数据帧中打破DF，制作geopoint和拼接之外，您是否知道更优雅的解决方案？

E.g。像那样，用伪数据：

state = rep("IL", 2500)
city  = rep("Chicago", 2500)
ads   = rep(15, 2500)


ads_df = data.frame(state,city,ads)
ads_df <- cbind(geocode(as.character(ads_df$city)), ads_df)

state= rep("FL", 2500)
city  = rep("Miami", 2500)
ads   = rep(15, 2500)

ads_df1 = data.frame(state,city,ads)
ads_df1 <- cbind(geocode(as.character(ads_df1$city)), ads_df1)

ads_df = rbind(ads_df,ads_df1)

plot(ggplot(US, aes(x=long, y=lat)) +
              geom_polygon(aes(group = group) ) +
              coord_map() + geom_point(data=ads_df, aes(x=lon, y=lat, size=ads), color="orange"))

Answer 1

ggmaps设置为使用group表示多边形：

> plot(ggplot(US, aes(x=long, y=lat)) +
+          geom_polygon(aes(group = group)) +
+          coord_map())