r - 使用setwd()返回R中的默认值

有人知道返回R中默认工作目录的简单方法吗？

我知道我可以输入自己的家乡路径...

setwd("C:/Users/me/Desktop")

...但是我想我很懒。是否有默认命令或诸如此类的内容？

setwd(default)?

谢谢，如果您知道答案。

保罗

最佳答案

这是一个替代解决方案，因为Defaults包已存档:

# Use `formals<-`, but note the comment in the examples of ?formals:
#
## You can overwrite the formal arguments of a function (though this is
## advanced, dangerous coding).
formals(setwd) <- alist(dir = "C:/Users/me/Desktop")

或者，您可以使用以下内容屏蔽base::setwd():

setwd <- function(dir) {
  if (missing(dir) || is.null(dir) || dir == "") {
    dir <- "C:/Users/me/Desktop"
  }
  base::setwd(dir)
}

更新:默认程序包已存档，因此仅当您从CRAN存档下载该程序包并自己从源代码构建时，此解决方案才有效。

您可以使用Defaults软件包将其设置为所需的内容。然后，您可以调用setwd()。

library(Defaults)
setDefaults(setwd, dir="C:/Users/me/Desktop")
setwd()

参见this answer if you want to put the above code in your .Rprofile。