确定执行脚本的路径

我有一个名为foo的脚本。R包含另一个脚本other。R，在同一个目录下:

#!/usr/bin/env Rscript
message("Hello")
source("other.R")

但我想让R找到另一个。R，不管当前工作目录是什么。

换句话说，就是foo。R需要知道自己的路径。我该怎么做呢?

当前回答

这对我很有用

library(rstudioapi)    
rstudioapi::getActiveDocumentContext()$path

其他回答

这对我很有用。只是从命令行参数中greps它，去掉不需要的文本，执行dirname，最后从它获得完整的路径:

args <- commandArgs(trailingOnly = F)  
scriptPath <- normalizePath(dirname(sub("^--file=", "", args[grep("^--file=", args)])))

我已经将这个问题的答案打包并扩展为rprojroot中的新函数thisfile()。也适用于编织与针织。

参见R.utils包的findSourceTraceback()，其中

查找source()在所有调用帧中生成的所有'srcfile'对象。这使得可以找出当前由source()编写脚本的文件。

从这个问题，获取R脚本的路径，获取当前脚本的路径，查找当前。R文件的位置，以及在Rstudio中将工作目录设置为源文件位置的R命令，我几乎尝试了所有方法，但最后发现自己手动浏览CRAN表并发现

脚本名称库

它提供了current_filename()函数，该函数在RStudio中提供源代码时，以及通过R或RScript可执行文件调用时，返回脚本的正确完整路径。

99%的情况你可以简单地使用:

sys.calls()[[1]] [[2]]

它将不适用于脚本不是第一个参数的疯狂调用，即source(some args, file="myscript")。在这些奇特的情况下使用@hadley's。

推荐文章