獲取文件列表，無子目錄

Question

我想獲取目錄中的文件列表，但完全刪除任何子目錄。 list.files有include.dirs選項，但在遞歸爲FALSE時強制它爲TRUE。

我不想在子目錄中的文件，我不想要的子目錄的名稱。我希望能夠調用：

list.files(recursive = F, include.dirs = F) 

操作系統是Windows 7.1

Answer 1

這個怎麼樣？

list_files_only = function(...) { 
    all_files = list.files(...) 
    dirs = list.dirs(..., recursive = FALSE, full.names = FALSE) 
    setdiff(all_files, dirs) 
} 

作品爲當前工作目錄就好了，這要歸功於班·巴恩斯，應能穿過path Arg或其他ARGS。

Answer 2

使用assertive：

library(assertive) 
files <- dir() 
files[!is_dir(files)]