为何.Rprofile的.First函数中load(".RData")无效，调用脚本中却正常？

嘿，这个问题其实和R启动时的执行顺序有很大关系，我来给你拆解清楚：

首先，你得知道R启动的完整流程：

1. 先读入全局配置和你的.Rprofile文件（这时候会定义你的.First函数）
2. 然后，R会自动检查当前工作目录下有没有.RData，如果有就直接加载到全局环境里
3. 最后才会运行你定义的.First函数

为什么你的.First里load(".RData")看起来没效果？ #

有两种最可能的原因：

• 重复加载等于没加载：R已经在.First运行前自动加载过.RData了，你再手动跑一遍load，只是把同样的内容再灌进全局环境一次，自然看不到任何变化。
• 路径错了：你在.First里先执行了setwd切换到新目录，但R自动加载.RData是在切换路径之前完成的。切换路径后你再load(".RData")，如果新目录里根本没有这个文件（或者是空文件），那自然啥也不会发生——如果是文件不存在，R其实会报错，可能你没注意到？

那为啥source的脚本里load能正常工作？ #

大概率是你的MKS Startup.R里的load要么指定了完整的文件路径（比如直接写load("C:/Users/Mike/Documents/.RData")），要么脚本里的逻辑是在加载后做了一些能让你看到变化的操作（比如创建新对象、修改现有对象），所以你能明显感知到加载生效了。

怎么解决这个问题？ #

给你两个实用的方案：

方案1：让R自动加载目标目录的.RData

把setwd从.First里移出来，放到.Rprofile的全局代码区（也就是.First函数外面）：

# .Rprofile 全局部分
setwd("C:/Users/Mike/Documents/R Projects")

.First <- function(){ 
  library(R.utils) 
  cat("\n------------------------------------------\n\n ") 
  cat("\n Personal RProfile!\n\n ") 
  cat("\n Working Directory: ") 
  utils::loadhistory(".Rhistory") 
  # 这里不用手动load了！R已经自动加载了当前目录的.RData
  cat(getwd()) 
  cat("\n\n") 
  source("MKS Startup.R") 
}

这样R在读完.Rprofile的全局代码后，会自动加载你指定目录下的.RData，完全不需要手动调用load。

方案2：手动加载时指定完整路径

如果你一定要在.First里手动加载，就别依赖当前工作目录，直接写死文件的完整路径：

.First <- function(){ 
  library(R.utils) 
  cat("\n------------------------------------------\n\n ") 
  cat("\n Personal RProfile!\n\n ") 
  cat("\n Working Directory: ") 
  target_dir <- "C:/Users/Mike/Documents/R Projects"
  setwd(target_dir) 
  utils::loadhistory(file.path(target_dir, ".Rhistory")) 
  # 用完整路径加载，确保不会找错文件
  load(file.path(target_dir, ".RData")) 
  cat(getwd()) 
  cat("\n\n") 
  source(file.path(target_dir, "MKS Startup.R")) 
}

另外，你可以加个小测试验证一下：在.First里load之前加一句print(file.exists(".RData"))，看看当前目录下到底有没有这个文件——如果返回FALSE，那就是路径问题；如果返回TRUE，那就是重复加载导致没变化。

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