绘制美国地图-白色大三角形。固定的。新:每天 2500 个请求的地理编码限制
Plot USA map - big white triangle. FIXED. New: geocode limit of 2500 requests per day
绘制美国地图时,我得到了地图,但中间有一个白色的大三角形。有人看到相同的吗?
require(ggplot2)
require(ggmap)
require(maps)
US <- map_data("usa", region=".")
plot(ggplot(US, aes(x=long, y=lat)) +
geom_polygon() +
coord_map())
以上问题已修复。
现在我想在地图上用 ads/calls/etc 的数量标记城市 - 一个包含 4900 个位置的数据框。但是,google
将非企业用户的使用量限制为每天 2500 次。
除了在较小的 (<= 2500) 行数据帧中打破 DF,制作 geopoint
和拼接之外,您是否知道更优雅的解决方案?
例如像那样,使用伪数据:
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"))
ggmaps
设置为对多边形使用 group
:
> plot(ggplot(US, aes(x=long, y=lat)) +
+ geom_polygon(aes(group = group)) +
+ coord_map())
绘制美国地图时,我得到了地图,但中间有一个白色的大三角形。有人看到相同的吗?
require(ggplot2)
require(ggmap)
require(maps)
US <- map_data("usa", region=".")
plot(ggplot(US, aes(x=long, y=lat)) +
geom_polygon() +
coord_map())
以上问题已修复。
现在我想在地图上用 ads/calls/etc 的数量标记城市 - 一个包含 4900 个位置的数据框。但是,google
将非企业用户的使用量限制为每天 2500 次。
除了在较小的 (<= 2500) 行数据帧中打破 DF,制作 geopoint
和拼接之外,您是否知道更优雅的解决方案?
例如像那样,使用伪数据:
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"))
ggmaps
设置为对多边形使用 group
:
> plot(ggplot(US, aes(x=long, y=lat)) +
+ geom_polygon(aes(group = group)) +
+ coord_map())