ggplot on ggmap，彩色点依赖于值

Question

我的数据集表示蜂箱的位置（纬度，长度）以及该位置有多少对寄生虫呈阳性。

绘制地图上的位置很好但是我想改变具有寄生虫存在的点的颜色，例如标题＆＃39;肯定＆＃39; ＆GT; 0

我已尝试过以下代码，但我无法在地图上告诉我它不能为地图添加0

myMap + ggplot(honeybee, aes(x= Long, y= Lat)) + 
  geom_point(aes(colour = cut(Positive, c(-1, 0, 5))), size = 1) +
  scale_color_manual( values = c("red", "black"), 
                     name = "Parasite", labels = c("Absent", "Present"))

基本上我希望上面的代码适合ggmap

Answer 1

我不确定你的地图在哪里，因为你没有包含数据，但是你可以用ggmap来完成它。没有必要再次调用ggplot。只需将您的honeybee数据源直接包含在图层

中

library(ggmap)
m <- get_map("New York City", zoom=14,maptype="toner",source="stamen")
myMap <- ggmap(m)
honeybee <- data.frame(Lat=runif(20,min=40.69, max=40.73),
                       Long=runif(20, min=-74.03, max=-73.98),
                       Positive = rnorm(20)) 


myMap + 
  geom_point(data=honeybee, 
             mapping=aes(x= Long, y= Lat, colour = Positive>0), 
             size = 5) +
  scale_color_manual( values = c("red", "yellow"), 
                      name = "Parasite", 
                      labels = c("Absent", "Present"))

哪个产生