使用 R 中的 setwd() 向后退 N 级

Question

有没有办法使用 R 函数 setwd() 分层次返回目录？

例如

> getwd() 
  /home/folder1/folder2/

我想不用打字直接到家setwd("../..")。写n次"../"

很繁琐

Answer 1

一种方法是动态创建路径 "../.."。

setwd_n_levels <- function(n) {
  setwd(paste0(rep('..', n), collapse = '/'))
}

setwd_n_levels(2)
getwd()

Answer 2

我们可以使用strrep

setwd_n_levels <- function(n) {
   setwd(trimws(strrep('../', n), whitespace = '/'))
  }

Go backward by N levels using setwd() in R