R Markdown中setwd()切换工作目录失效无法导入跨目录数据

你遇到的问题是R Markdown工作目录机制和普通R脚本不一致导致的，核心误区有两个：

• knitr渲染Rmd文档时，默认所有代码块的根工作目录固定为*.Rmd文件本身存储的文件夹*，普通setwd()属于base R的临时目录修改函数，作用域仅限当前代码块的执行上下文，在部分渲染配置下，knitr会在执行代码块内语句前自动重置工作目录到Rmd所在路径，直接导致你写的setwd()不生效。
• 你写的绝对路径本身大概率有误：Mac系统下/Users目录下默认只有各用户的个人文件夹，不存在直接命名为folderwithdata的一级子目录，正确路径格式应为/Users/你的系统用户名/folderwithdata，路径不存在时setwd()会执行失败，后续读取文件自然会报找不到文件的错误。

按可靠性从高到低排序：

方法1：直接使用文件完整路径读取（最推荐，无需切换工作目录） #

不需要修改全局工作目录，读取文件时直接传入文件的完整绝对路径即可，从根源上避免工作目录切换带来的混乱：

rm(list=ls())
library(haven)
# 替换为你数据文件的真实完整路径
data <- read_dta("/Users/你的系统用户名/folderwithdata/mydata.dta")

如果是在RStudio Project环境下，更推荐用here包做相对路径管理，避免硬编码本机绝对路径，把项目移到其他设备/文件夹时不需要修改路径：

rm(list=ls())
library(haven)
library(here)
# 此处路径写数据文件相对于项目根目录的相对路径即可
data <- read_dta(here("data", "mydata.dta"))

方法2：全局设置knitr根工作目录 #

如果你确实需要统一修改所有代码块的默认工作目录，不要用setwd()，而是在文档第一个执行的setup代码块中，通过knitr的配置项设置全局根目录，该设置会对所有后续代码块生效：

# 放在第一个代码块最开头
knitr::opts_knit$set(root.dir = "/Users/你的系统用户名/folderwithdata")

注意：该设置不会修改当前代码块的工作目录，从下一个代码块开始才会切换到指定路径。

方法3：提前校验路径有效性 #

如果确认要用setwd()，先执行命令校验路径是否真实存在，避免路径拼写错误导致切换失败：

# 替换为你要切换的目标文件夹路径，返回TRUE才说明路径有效
dir.exists("/Users/你的系统用户名/folderwithdata")

• 不要在R Markdown中频繁调用setwd()切换目录，很容易造成不同代码块工作目录不一致，出现偶发的找不到文件问题。
• 尽量不要硬编码本机专属的绝对路径，用R项目+here包管理文件路径，代码的可移植性会好很多。

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