R ggmap&x2B；几何点：创建可变数量的；geom“U点”；取决于输入。绘图图

我正在绘制地图。我有一个数据集，其中有许多（纬度，lng）坐标，每个坐标都分配给一个类型。例如：

df <- data.frame(type=c("a", "a", "b", "c"), lat=c(47, 46, 48, 48.5), lng=c(8, 8.9, 8.3, 8.3))

>df
type lat  lng
a    47   8
a    46   8.9
b    48   8.3
c    48.5 8.3

df
lat型液化天然气
a 47 8
a 46 8.9
b 48 8.3
c 48.5 8.3

我想做的是在一张区域地图上画出点，给每个群体一个不同的颜色。“类型”组的数量可根据输入数据而变化，通常较大

所以a点应该是绿色的，例如b点是红色的，c点是蓝色的

到目前为止，我使用的绘制小组图的方法是“ggmap”：

---

x也许这会有帮助。在
geom_point
美学中，您可以指定应根据data.frame中的
类型设置
颜色。只需包含一次
geom_point
语句。此外，如果要为不同类型指定单独的颜色，可以使用
scale\u color\u manual
并在那里定义它们

library(ggmap)

set.seed(12345)

points <- data.frame(type = sample(LETTERS[1:4], 10, replace = T),
                     lon = rnorm(10, -95.4, 0.1),
                     lat = rnorm(10, 29.7, 0.1))

ggmap(get_stamenmap()) +
  geom_point(data = points, aes(lon, lat, color = type)) +
  scale_color_manual(values = c("A" = "blue", "B" = "green", "C" = "red", "D" = "orange"))

库（ggmap）
种子集（12345）
要点
library(ggmap)

set.seed(12345)

points <- data.frame(type = sample(LETTERS[1:4], 10, replace = T),
                     lon = rnorm(10, -95.4, 0.1),
                     lat = rnorm(10, 29.7, 0.1))

ggmap(get_stamenmap()) +
  geom_point(data = points, aes(lon, lat, color = type)) +
  scale_color_manual(values = c("A" = "blue", "B" = "green", "C" = "red", "D" = "orange"))