如何找到目录并在R中自动设置工作目录路径？

Question

我直接在R的默认根目录下有一个“ Box Sync”文件夹。我正在尝试创建代码，以便即使我的目录和“ Box Sync”文件夹之间还有其他目录，我也可以找到该目录并将其设置为工作目录。

Answer 1

您可以使用list.dirs(recursive=T)查找工作目录中的所有目录，然后使用endsWith查找本身名为Box Sync的目录。如果需要，您可以进一步过滤它们并分配给setwd：

dirs <- list.dirs(recursive = T)  # List all directories in the working directory
box_dirs <- dirs[endsWith(dirs, 'Box Sync')]  # Show the ones ending with 'Box Sync'

box_dirs
    [1] "./Box Sync"
    [2] "./Library/Application Support/Box/Box Sync"                                    
    [3] "./Library/Logs/Box/Box Sync"           

setwd(box_dirs[1])