Temporarily change the current working directory.

with_dir(new, code)

local_dir(new = list(), .local_envir = parent.frame())

Arguments

new

[character(1)]
New working directory

code

[any]
Code to execute in the temporary environment

.local_envir

[environment]
The environment to use for scoping.

Value

[any]
The results of the evaluation of the code argument.

See also

withr for examples

setwd()

Examples

#> [1] "/private/var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T/RtmpCmrTmV/file6ec19f92368/reference"
with_dir(tempdir(), getwd())
#> [1] "/private/var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T/RtmpCmrTmV"