地图上的颜色编码坐标

Question

您好我正在尝试根据群组对我的坐标点进行颜色编码，但似乎无法解决问题。我的代码目前是：

ponymap <- get_map(location = c(lon = mean(df$lon), lat = mean(df$lat)), zoom =14,
                  maptype = "satellite", scale = 2)

ggmap(ponymap) +
geom_point(data = df, aes(x = lon, y = lat, colour="band"), size = 2, shape = 21) +`guides(fill="band", alpha=FALSE, size=FALSE)`

如果我添加scale_color_manual(values=c("")我的地图没有任何变化？

我有七组需要颜色编码。

非常感谢!!