r - ggmap 上的 ggplot 带有取决于值的彩色点

Question

我的数据集表示 hive 的位置(纬度、经度)以及该位置有多少对寄生虫呈阳性。

在 map 上绘制位置很好，但我想更改存在寄生虫的点的颜色，例如标题“正面”> 0

我已经尝试了以下代码，但我不能 + 到 map 它告诉我它不能将 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

我不确定你从哪里得到你的 map ，因为你没有包含数据，但这里是你如何使用 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"))

其中产生