如何在R语言tmap包绘制的地图中获取指定点坐标

不用反复试错，直接用R的交互式取点工具就能精准获取坐标，以下是具体操作：

• 基础方法：使用base R的locator()函数

  1. 先绘制好你的基础地图（默认是tmap_mode("plot")静态模式，符合tmap_scale_bar的使用场景）：

     library(tmap)
     # 替换成你的实际地图数据
     tm_shape(your_map_data) + tm_polygons()
     

  2. 在控制台运行locator(1)，光标会变为十字形，点击地图上你想要放置比例尺的位置，R会直接返回该点的x、y坐标：

     pos <- locator(1)
     # 提取成可直接使用的坐标向量
     scale_position <- c(pos$x, pos$y)
     

  3. 将坐标向量传入tm_scale_bar的position参数：

     tm_shape(your_map_data) + tm_polygons() + tm_scale_bar(position = scale_position)
     

• 批量制图优化
  只需获取一次坐标并保存为变量，批量生成地图时直接调用该变量即可，无需重复取点：

  # 替换为你用locator获取的实际坐标
  fixed_scale_pos <- c(116, 39)
  # 批量制图循环示例
  for (map_idx in 1:length(your_map_dataset_list)) {
    tm_shape(your_map_dataset_list[[map_idx]]) + 
      tm_polygons() + 
      tm_scale_bar(position = fixed_scale_pos) +
      tmap_save(filename = paste0("output_map_", map_idx, ".png"))
  }
  

• 注意事项

  • 如果当前是tmap_mode("view")交互式地图模式，locator()无法直接使用，可先切换回静态模式取点，再将坐标应用到交互式地图中（二者坐标体系一致）。
  • locator()返回的坐标与你的地图数据坐标系完全匹配，无需额外转换。

内容的提问来源于stack exchange，提问作者dev