keros68

Study Area Map.Skill — Productivity skill for Claude Code

Productivity community

Moved to keros68/xiaoyu-skill — study-area map workflow for research papers.

How to install Study Area Map.Skill

This entry records only its repository, not the path inside it, so there is no exact command to give. Open keros68/study-area-map.skill and copy the folder into ~/.claude/skills/, or the file into ~/.claude/agents/.

What Study Area Map.Skill does

Moved to keros68/xiaoyu-skill — study-area map workflow for research papers.

Alternatives in Productivity

Embrace — Full Double Diamond workflow - Research → Define → Develop → Deliver 2.8k ★
Land A Job — Workflow recipe — go after a specific role end to end by chaining 4 skills: decode the JD, research the compan 1.3k ★
MCP Webresearch — MCP web research server (give Claude real-time info from the web) 298 ★

README

study-area-map.skill

**本项目已并入 [xiaoyu-skill](https://github.com/keros68/xiaoyu-skill/tree/main/skills/study-area-map)。本仓库保留为只读历史入口，后续更新请前往新仓库。**

用 R 绘制论文研究区区位图的 Claude Code 技能。基于 ggplot2、sf、terra。

负责快速搭出框架：投影、窗口、面板对齐、地形合成、图廓件。配色、留白、标注位置与要素取舍出图后自行调整。

功能

多级定位面板（国家、省、研究区），各级图框等宽
分层设色地形底图，山影按相乘合成，分级边界和饱和度都保留
缩放引线，虚线锥连接相邻两级面板
图内图例、针形指北针、比例尺
投影窗口、DEM 缺值、图廓件压框、角框压盖陆地、强调色撞色、色带可分辨性，均自带断言

安装

git clone https://github.com/keros68/study-area-map.skill.git \
  ~/.claude/skills/study-area-map

放在 `~/.claude/skills/` 下全部项目可用，放在项目的 `.claude/skills/` 下仅该项目可用。

用法

两个模块自带线宽、字号、字体注册与地图主题，加载后即可用。

SK <- "~/.claude/skills/study-area-map/reference/"
source(paste0(SK, "relief_basemap.R"))
source(paste0(SK, "palettes.R"))

CRS_M <- "+proj=aea +lat_1=39.3 +lat_2=40.4 +lat_0=39.85 +lon_0=113.3 +datum=WGS84 +units=m +no_defs"

# 窗口：经纬矩形投影后是弯的四边形，取内接矩形，栅格才能铺满图框
W <- inscribed_window(c(112.0, 114.6), c(39.02, 40.80), CRS_M)

# 地形：分级边界由这份 DEM 自身的 2–98 分位推出，不沿用别处的边界
dem  <- load_dem("F:/DEM", "ASTGTMV003_.*_dem[.]tif$", CRS_M, W, fact = 3)
brk  <- elev_breaks(dem, n = 6)
cols <- pal_hypso("terrain", length(brk) - 1)
rel  <- relief_rgb(dem, brk, cols, strength = 0.42)

ggplot() +
  tidyterra::geom_spatraster_rgb(data = rel) +
  geom_sf(data = aoi, fill = NA, colour = "#C62828", linewidth = LW_DAT * 1.3) +
  north_needle(W) +
  elev_legend_block(W, cols, elev_labels(brk), panel_h_mm = 90) +
  coord_sf(xlim = W[c("xmin", "xmax")], ylim = W[c("ymin", "ymax")],
           expand = FALSE) +
  theme_map_pub()

图面内的图例落在研究区上，是窗口贴着研究区取的必然结果：没有空角可放。`pad_until_clear()` 放大窗口直到图例区不压研究区，研究区因此画得小一些，让出的边缘正是图例落脚的地方。示例的太原窗口由此定在 19%。另一条路是把图例移到图框外，两者都成立。

图例内部的行距按毫米排，所以要传面板高度。行距若按比例给，文字高度是固定的毫米数，面板一小文字占比就变大，刻度数字会压到图例自己的边框上。

`coord_sf()` 必须排在所有 `geom_sf()` 之后。`geom_sf()` 自带一个默认 `coord_sf()`，排在其后会替换掉已设的窗口，面板退回数据全域。`assert_window(p, W)` 用于核验。

多面板拼版的顺序与单幅相反：先用 `pin_panel()` 把各面板尺寸定死，再用 `gridExtra::arrangeGrob()` 按毫米拼，最后由 `box_in()` 算出引线端点。完整流程见 `SKILL.md`。