小编ljh*_*001的帖子

我试图在地图上绘制多个条形图，我只是在寻找一个开始的地方。我已经看过几个问题（如下所示）。

地图上的条形图

使用ggplot2在地图上绘制条形图？

如何将条形图绘制到 ggplot2 地图上

然而，所有这些似乎都过时了。

以下是我试图绘制的数据。我希望在一张地图上绘制 4 个地块，每个地理位置都有一个。我希望每个地块都是每个位置的每个目的的计数。

                 geoloc                     purpose count
1      Eastern Atlantic                    Behavior     4
2      Eastern Atlantic           Impacts/Fisheries     7
3      Eastern Atlantic                   Knowledge     8
4      Eastern Atlantic Migration/Habitat Selection     2
5      Eastern Atlantic                    Movement    10
7       Eastern Pacific                    Behavior     1
8       Eastern Pacific           Impacts/Fisheries     1
9       Eastern Pacific                   Knowledge     3
10      Eastern Pacific Migration/Habitat Selection     2
11      Eastern Pacific                    Movement     4
13 Southwestern Pacific                    Behavior     3
14 Southwestern Pacific                    Movement     7
15     Western Atlantic                    Behavior     8 …

我在 R 中创建了下图，以可视化我运行的模型的原始数据和预测。预测以线的形式给出，原始数据以圆圈的形式给出。2018 年的数据目前可视化为空心圆或实线，而 2019 年的数据可视化为实心圆和虚线。海鱼数据是黑色的，而淡水鱼数据包括灰色的。就目前而言，这个传说有点难以理解。我想做两件事。

1. 而不是在图例中将方向符号化为点和线，我只想要一个显示各自颜色的矩形。

2. 我想分离年份符号系统。我希望它的格式如下：

实线（空白）2018（空白）实心圆

虚线（空白）2019（空白）空心圆

这是我的数据：

structure(list(Year = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 2L, 1L, 2L, 1L, 2L, 1L, 1L, 
2L, 1L, 2L, 1L, 2L, 2L, 1L, 1L, 1L, 2L, 1L, 2L, 1L, 1L, 2L, 1L
), .Label = c("2018", "2019"), class = "factor"), Yday = c(176L, 
178L, …