如何在R Markdown中读取sav文件并支持正常knit导出PDF

算力阿峰

2026-9-29

R Markdown knit为PDF时file.choose()报错的解决方法

报错原因

file.choose()是交互式环境下调用系统文件选择窗口的函数，R Markdown执行knit操作时会运行在非交互式环境，无法弹出选择窗口，会直接触发「file choice cancelled」的报错终止运行。另外file.choose()本身不支持传入预设路径参数，你代码中写入的路径不会生效。

解决方案

方案1：直接使用固定路径读取
去掉file.choose()调用，直接将文件路径传入read_sav()即可，示例代码：
```
library(haven)
bes <- read_sav("/Users/kn/Desktop/data.sav")
```
注意路径格式：Mac/Linux系统使用正斜杠/，Windows系统可以使用正斜杠/或者双反斜杠\\。
方案2：使用相对路径读取（更推荐）
将data.sav文件和你当前的R Markdown文件放在同一个文件夹下，直接读取文件名即可，代码示例：
```
library(haven)
bes <- read_sav("data.sav")
```
该方式的优势是项目文件夹整体迁移到其他设备也可以正常运行，不需要修改路径配置。

方案3：兼容交互式编辑和knit场景
如果平时编辑时需要使用文件选择框，不想写死路径，可以增加交互式环境判断，代码示例：

library(haven)
if (interactive()) {
  # 交互式环境（RStudio编辑时）弹出文件选择框
  bes <- read_sav(file.choose())
} else {
  # 非交互式环境（knit时）使用预设路径
  bes <- read_sav("/Users/kn/Desktop/data.sav")
}