如何绘制Cell文章好看的气泡地图？

文章预览

前段时间，在 《Nature文章中的地图图表如何绘制？》 一文中介绍过如何绘制世界地图图表，但一般来说，文献中的低精度地图图表是气泡组合图，如下图，用以表示研究样本的地理分布、相对丰度等。 （ Cell , 2021） （ Nature , 2024） 那么，如何绘制上文Cell文章中那样的“地图+气泡图“组合图呢？ #载入绘图包； library (maps) #载入ggplot2包； library (ggplot2) #创建地图数据数据框； world_map   < - map_data( "world" ) #预览数据； head (world_map,10) #绘制低精度全球地图; p1   < - ggplot(data = world_map, aes(x = long, y = lat, group = group)) +    geom_polygon (colour= "grey50" , fill= "grey100" ,linewidth=0.1) p1 #更改区域填充颜色，去掉轮廓线; p2   < - ggplot(data = world_map, aes(x = long, y = lat, group = group)) +    geom_polygon (colour= "grey80" , fill= "grey80" ) p2 #修改坐标轴范围和刻度,去掉南极洲区域； p3   < - ………………………………