如何在Azure Pipeline中访问拉取请求（Pull Request）内变更的R脚本以执行代码检查

我来帮你搞定这个问题！在Azure Pipeline里针对PR中变更的R脚本做lint检查，核心思路就是先精准定位PR里改动过的R脚本，再只对这些文件执行lint操作，既高效又不会做无用功。下面是具体的实现步骤：

1. 获取PR中变更的R文件列表 #

Azure Pipeline在PR触发的场景下，提供了两个关键内置变量：System.PullRequest.SourceCommitId（PR源分支的最新提交ID）和System.PullRequest.TargetCommitId（目标分支的最新提交ID）。我们可以用git命令对比这两个提交，筛选出变更的.R文件：

# 对比PR源分支和目标分支的提交，输出变更的文件，过滤出R脚本并保存到文件
git diff --name-only $(System.PullRequest.TargetCommitId) $(System.PullRequest.SourceCommitId) | grep "\.R$" > changed_R_files.txt

如果没有变更的R脚本，这个文件会是空的，后续我们可以通过条件判断跳过lint步骤。

2. 针对变更文件运行Lint检查 #

假设你用的是R生态里常用的lintr包做代码检查，我们可以写一个专门的R脚本来处理变更文件的lint：

# lint_changed_files.R
library(lintr)

# 读取之前生成的变更R文件列表
changed_files <- readLines("changed_R_files.txt")

# 有变更文件才执行lint
if (length(changed_files) > 0) {
  # 对所有变更的R脚本执行lint
  lint_results <- lint_files(changed_files)
  
  # 如果发现lint问题，输出结果并让脚本以非0状态退出（触发Pipeline失败）
  if (length(lint_results) > 0) {
    print(lint_results)
    quit(status = 1)
  } else {
    cat("✅ 所有变更的R脚本都通过了lint检查！\n")
  }
} else {
  cat("ℹ️ 没有变更的R脚本需要检查，跳过lint步骤。\n")
}

然后在你的Pipeline YAML里添加步骤调用这个脚本：

- script: Rscript lint_changed_files.R
  displayName: 'Lint Changed R Scripts'
  # 只有当变更文件列表存在且非空时才执行
  condition: and(exists('changed_R_files.txt'), ne(fileContents('changed_R_files.txt'), ''))

3. 配置Pipeline的PR触发规则 #

确保你的Pipeline只会在PR创建或更新时触发，在azure-pipelines.yml顶部添加：

pr:
  branches:
    include:
      - main  # 替换成你的目标分支名称，比如develop

额外小贴士 #

• 如果你需要自定义lint规则，可以在项目根目录创建.lintr配置文件，定义你的代码规范（比如允许的行长度、变量命名规则等）
• 如果你的仓库包含子模块，记得在git diff命令里加上--recursive参数，确保能捕获子模块里的变更R文件
• 可以在Pipeline里添加一个步骤，先检查changed_R_files.txt是否为空，为空的话直接输出提示并跳过后续lint，让Pipeline日志更清晰

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