覆盖ggmap上的点

时间:2014-06-09 01:56:27

标签: plot points ggmap

因此,我将森林地块中的树木放入马达加斯加的地图中 数据集的开头如下所示:

#ggmap!
library(ggmap)
library(mapproj)
map <- get_map(location = 'Madagascar', zoom = 4)
ggmap(map)
map <- get_map(location = 'Madagascar', zoom = 10)
geocode("kianjavato")
#lon       lat
#47.86682 -21.38024
k <- "kianjavato"
#qmap(k, zoom = 16)
#qmap(k, zoom = 16, source = "stamen", maptype = "toner")
myMap <- get_map(location=k, source="stamen", maptype="toner", crop=FALSE, zoom=16)
# having trouble zooming
ggmap(myMap)

以下是我用来制作地图并获得积分的代码:

ggplot(data=GPScorrect,aes(x=Lon,y=Lat))+geom_point()

但是当我使用这段代码将两者结合在一起时:

ggmap(myMap) + geom_point(data=GPScorrect,aes(x = 'Lon', y ='Lat'))

我收到此错误消息:

Error: Discrete value supplied to continuous scale

请帮助

1 个答案:

答案 0 :(得分:0)

在提问时,请务必提供一个前后执行的工作示例,直到遇到您要求的错误为止。在这种情况下,您无法为GPScorrect提供数据。

取消引用你的美学映射。如果您重新处理以下细分示例,您应该得到您正在寻找的内容:

library(ggmap)
library(mapproj)
myMap <- get_map(location = 'Madagascar', zoom = 6)

e1 <- geocode('Antananarivo')
e2 <- geocode('Toamasina')
e3 <- geocode('Antsirabe')
GPScorrect <- rbind(e1, e2, e3)

ggmap(myMap) + geom_point(data=GPScorrect,aes(x = lon, y =lat), color = 'firebrick', size = 3)