Определение текущего местоположения файла в R для включения файла из того же каталога?

Я хочу иметь возможность source() файла, который включает в себя другой файл в том же каталоге, но мне не нужно устанавливать рабочий каталог из R-подсказки перед запуском этого файла:

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

Внутри/Пользователи/myuser/workspace/myproject, будут myfile.r и my-utils.r. myfile.r вызывает source('my-utils.r') изнутри.

Другие языки программирования могут определять текущий путь к файлу. Есть ли у R что-то подобное? Пример:

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

Ответ 1

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

Если для параметра chdir установлено значение true, а параметр исходного файла - полный путь, каталог файла будет использоваться в качестве рабочего каталога при поиске файла.

ПРИМЕЧАНИЕ: cur_dir <- sys.get_current_file_path() не имеет большого смысла, потому что пути не уникальны.