r - 绘制带有标签的空间坐标

Question

我是 R 的新手。我有许多坐标，我想在 R 中以适当的方式绘制它们，它也显示标签。此外，轴应该呈现纬度和经度。我尝试了 ggplot，但我无法将数据与代码相匹配。

   id      lon      lat
1   2 7.173500 45.86880
2   3 7.172540 45.86887
3   4 7.171636 45.86924
4   5 7.180180 45.87158
5   6 7.178070 45.87014
6   7 7.177229 45.86923
7   8 7.175240 45.86808
8   9 7.181409 45.87177
9  10 7.179299 45.87020
10 11 7.178359 45.87070
11 12 7.175189 45.86974
12 13 7.179379 45.87081
13 14 7.175509 45.86932
14 15 7.176839 45.86939
15 17 7.180990 45.87262
16 18 7.180150 45.87248
17 19 7.181220 45.87355
18 20 7.174910 45.86922
19 25 7.154970 45.87058
20 28 7.153399 45.86954
21 29 7.152649 45.86992
22 31 7.154419 45.87004
23 32 7.156099 45.86983

Answer 1

为此使用 geom_text几何:

ggplot(aes(x = lon, y = lat), data = df) + geom_text(aes(label = id))

这会在 lon 和 lat 列指定的位置绘制 id 列中的文本。数据存储在 data.frame df 中。

或使用:

ggplot(aes(x = lon, y = lat), data = df) + geom_text(aes(label = id)) + 
    geom_point()

如果你想同时添加一个点和一个标签。使用 geom_text 的 hjust 和 vjust 参数更改标签相对于点的方向。此外，通过使用 geom_point 美学中的 color 参数，根据 var 列为每个点赋予颜色:

ggplot(aes(x = lon, y = lat), data = df) + geom_text(aes(label = id)) + 
    geom_point(aes(color = var))

请注意 ggplot2 无法处理 sp 包提供的 Spatial 类。使用 as.data.frame 将点 (SpatialPoints) 和网格集 (SpatialPixels/SpatialGrid) 转换为 data.frame。此外，使用fortify将多边形数据集(SpatialPolygons)转换为data.frame。