如何配置knitr的Swift自定义引擎以保留代码上下文并复用变量？

问题根源 #

当前的Swift引擎每次调用swift repl都会启动全新进程，会话完全独立，导致之前代码块定义的变量无法在后续代码块中访问。

解决方案：使用持久化Swift REPL会话 #

通过processx包创建持续运行的Swift REPL进程，让所有代码块共享同一个会话，从而实现变量复用。

1. 安装依赖包

先确保安装processx包：

install.packages("processx")

2. 重定义Swift引擎

修改setup代码块中的引擎定义：

library(processx)

# 全局存储Swift REPL进程，避免重复创建
if (exists(".swift_repl_process")) {
  .swift_repl_process$kill()
}
.swift_repl_process <<- process$new(
  command = "swift",
  args = "repl",
  stdout = "|",
  stderr = "|",
  stdin = "|"
)

# 等待REPL启动并读取初始启动信息，避免干扰后续输出
Sys.sleep(0.5)
.swift_repl_process$read_all_output()
.swift_repl_process$read_all_error()

# 定义Swift引擎逻辑
knitr::knit_engines$set(swift = function(options) {
  out <- character(0)
  
  if (isTRUE(options$eval)) {
    # 拼接当前代码并添加换行（REPL需要换行触发执行）
    current_code <- paste(options$code, collapse = "\n")
    .swift_repl_process$write_input(paste0(current_code, "\n"))
    
    # 等待代码执行完成（可根据代码复杂度调整等待时间）
    Sys.sleep(0.5)
    
    # 读取输出和错误信息
    stdout <- .swift_repl_process$read_all_output()
    stderr <- .swift_repl_process$read_all_error()
    out <- c(stdout, stderr)
    
    # 过滤掉REPL的提示符（如"> "），简化输出
    out <- grep("^> ", out, invert = TRUE, value = TRUE)
  }
  
  # 生成符合knitr要求的输出格式
  knitr::engine_output(options, options$code, out)
})

# 渲染结束后自动关闭REPL进程，释放资源
knitr::knit_exit_hook(function() {
  if (exists(".swift_repl_process")) {
    .swift_repl_process$kill()
  }
})

3. 测试效果

第一个代码块定义变量：

let helloText: String = "Hello"
print(helloText)

第二个代码块直接复用变量：

let punctuationMark: String = "!"
let helloTwo: String = helloText + punctuationMark
print(helloTwo)

此时第二个代码块会正常输出Hello!，不会出现变量未找到的错误。

注意事项 #

• 若代码执行耗时较长，可适当延长Sys.sleep()的等待时间，确保代码执行完成后再读取输出。
• Swift中let定义的常量无法重复定义，后续代码块若重复定义同一常量仍会报错，这是Swift语言特性，并非引擎问题。
• 渲染完成后，knit_exit_hook会自动关闭REPL进程，避免资源占用。

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