我经常发现自己在编写R脚本,生成大量输出.我发现把这个输出放进自己的目录更干净.我在下面写的内容将判断目录是否存在并移入其中,或者创建目录然后移入其中.有更好的方法吗?

mainDir <- "c:/path/to/main/dir"
subDir <- "outputDirectory"

if (file.exists(subDir)){
    setwd(file.path(mainDir, subDir))
} else {
    dir.create(file.path(mainDir, subDir))
    setwd(file.path(mainDir, subDir))

}

推荐答案

使用showWarnings = FALSE:

dir.create(file.path(mainDir, subDir), showWarnings = FALSE)
setwd(file.path(mainDir, subDir))

dir.create()不会崩溃如果目录已经存在,它只会打印一条警告.因此,如果你能忍受看到警告,那么这样做没有问题:

dir.create(file.path(mainDir, subDir))
setwd(file.path(mainDir, subDir))

R相关问答推荐

将数据集中的值增加到当前包含的最大值

如何在区分不同条件的同时可视化跨时间的连续变量?

R-更新面内部的栅格值

在组中添加值增加和减少的行

使用rvest从多个页面抓取时避免404错误

使用RSelenium在R中抓取Reddit时捕获多个标签

如何根据R中其他变量的类别汇总值?

汇总数据帧中的复制列,保持行的唯一性

如何平滑或忽略R中变量的微小变化?

循环遍历多个变量,并将每个变量插入函数R

在生成打印的自定义函数中,可以通过变量将线型或 colored颜色 设置为NULL吗?

GOGPLATE geom_boxploy色彩疯狂

子样本间系数检验的比较

将R中对象的CSV数组转换为JSON数组

带有Bootswatch Cerulean主题的shiny 仪表板中的浏览&按钮可见性问题

创建两个变量组合的索引矩阵

当R使用c()组合两个向量时会发生什么?

是否有全局选项来调整仅显示10行的tibles的默认设置?

添加一部分UI元素作为Introjs()教程的一个步骤

如何转置gtsum tbl_sum对象?