是否可以使用ggplot在地图上叠加散点图?

时间:2014-06-19 14:31:46

标签: r ggplot2

我想绘制法国部门(即法国各区)的地图,并在地图上绘制积分。我使用ggplot2绘制地图但是当我想在地图上添加点时,R会返回一个错误,表示无法找到' group'。

library("ggplot2")
library("ggmap")

# load the contour of French departements
wg  <- read.csv("data/departements.csv")

metropoles  <- c("Paris", "Rennes", "Rouen", "Lille", "Marseille")
geo  <- geocode(metropoles)
met  <- data.frame(ville = metropoles, geo)

map  <- ggplot(data = wg, aes(x = long, y = lat, group = group)) + 
geom_polygon() + 
scale_x_continuous(limits = c(-7,10)) + 
scale_y_continuous(limits = c(40,53)) + 
coord_map() + 
theme(axis.text = element_blank(), axis.title = element_blank()) 

map + geom_point(data = met, aes(x = lon, y = lat))

对于复制,您可以找到原始数据here和R程序here

1 个答案:

答案 0 :(得分:2)

@Roland得到了很好的答案。问题在于我将群组定义为一般参数。

ggplot() + 
  geom_polygon(data = wg, aes(x = long, y = lat, group = group)) + 
  scale_x_continuous(limits = c(-7,10)) + 
  scale_y_continuous(limits = c(40,53)) + 
  coord_map() + 
  theme(axis.text = element_blank(), axis.title = element_blank()) 
  geom_point(data = met, aes(x = lon, y = lat))