确定执行脚本的路径

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

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

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

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

当前回答

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

脚本名称库

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

其他回答

我喜欢这种方法:

this.file <- sys.frame(tail(grep('source',sys.calls()),n=1))$ofile
this.dir <- dirname(this.file)

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

请注意，getopt包提供了get_Rscript_filename函数，该函数使用与本文相同的解决方案，但已经在标准R模块中为您编写了该解决方案，因此您不必将“获取脚本路径”函数复制并粘贴到您编写的每个脚本中。

这个问题有一个简单的解决办法。这个命令:

script.dir <- dirname(sys.frame(1)$ofile)

返回当前脚本文件的路径。它在保存脚本后工作。

如果而不是脚本，foo。R，知道它的路径位置，如果你可以改变你的代码，总是从一个公共根引用所有的源路径，那么这些可能会有很大的帮助:

https://github.com/r-lib/rprojroot或https://rprojroot.r-lib.org/ https://here.r-lib.org/

鉴于

/ app /深度/嵌套/ foo。R /应用程序/其他。R

这是可行的

#!/usr/bin/env Rscript
library(here)
source(here("other.R"))

参见https://rprojroot.r-lib.org/了解如何定义项目根。

推荐文章