使用不同的标签和颜色在R中绘制地图

这是我组织数据绘制地图的方式。我希望所有带有

split

标签

Night

的点都使用一种颜色（比如蓝色），所有带有

Day

标签的点都使用不同的颜色（在下面的示例中看不到

Day

）：

我一直在尝试跟随和修改其他在线帖子中的代码，但我遇到了一些麻烦，因为我想用颜色标记我的点。这就是我到目前为止所取得的成绩，现在我只需要一些帮助来绘制要点：

# creating a sample data.frame with your lat/lon points
lon <- times$Longitude
lat <- times$Latitude
df <- as.data.frame(cbind(lon,lat))

# getting the map
mapgilbert <- get_map(location = c(lon = mean(df$lon), lat = mean(df$lat)), zoom = 15,
                      maptype = "satellite", scale = 2)

# plotting the map, but don't know how to label points according to information on column "split"
ggmap(mapgilbert) +
  geom_point(data = df, aes(x = lon, y = lat, fill = "red", alpha = 0.8), size = 3, shape = 21) +
  guides(fill=FALSE, alpha=FALSE, size=FALSE)

#使用lat/lon点创建示例data.frame
你可以试试传单：

times$color <- ifelse(times$split == "Night", "#000cff", "#ffa500")

lon <- times$Longitude
lat <- times$Latitude
split <- times$split
color <- times$color
df <- cbind(lon,lat,split,color)

m <- leaflet() %>%
    addTiles() %>%  # Add default OpenStreetMap map tiles
    addCircleMarkers(df, lng = lon, lat = lat, radius = 5, color = color,
               weight = 3, opacity = 1.0, fill = TRUE, fillColor = color,
               fillOpacity = 0.5, popup=split)
m

times$color@Dave2e的可能副本我已经编辑了这篇文章，因此删除了与您之前提到的文章相似的问题。我希望事情现在更清楚了。
times$color <- ifelse(times$split == "Night", "#000cff", "#ffa500")

lon <- times$Longitude
lat <- times$Latitude
split <- times$split
color <- times$color
df <- cbind(lon,lat,split,color)

m <- leaflet() %>%
    addTiles() %>%  # Add default OpenStreetMap map tiles
    addCircleMarkers(df, lng = lon, lat = lat, radius = 5, color = color,
               weight = 3, opacity = 1.0, fill = TRUE, fillColor = color,
               fillOpacity = 0.5, popup=split)
m