¿Determinar la ubicación actual del archivo en R para incluir el archivo en el mismo directorio?

Question

Quiero ser capaz de source() un archivo que incluye un archivo diferente en su mismo directorio, pero yo no quiero tener que establecer el directorio de trabajo del R-confirmación antes de ejecutar este archivo:

> getwd() 
[1] "/Users/myser" 
> source("/Users/myuser/workspace/myproject/myfile.r") 

Dentro de/Users/myuser/workspace/myproject, habría myfile.r y my-utils.r. myfile.r llama al source('my-utils.r') desde dentro.

Otros lenguajes de programación pueden determinar la ruta del archivo actual. ¿Tiene R algo similar? Ejemplo:

cur_dir <- sys.get_current_file_path() 
source(file.path(cur_dir, "my-utils.r")) 

Answer 1

source("/Users/myuser/workspace/myproject/my-utils.r", chdir=TRUE) 

Cuando chdir opción se establece en true y el parámetro de archivo de origen es una ruta completa, el directorio de archivo se utilizará como directorio de trabajo, mientras que el archivo de aprovisionamiento.

NOTA: cur_dir <- sys.get_current_file_path() no tiene mucho sentido porque los nombres de ruta no son únicos.