我的工作目录中有许多空文件夹。想要删除R中的那些空文件夹。有人可以帮我这个忙。
假设当前目录是您要删除空文件夹的目录,则可以执行以下操作:
folders <- list.dirs(recursive = FALSE)
for(folder in folders){
if(length(dir(folder)) == 0){
unlink(folder, recursive = TRUE)
}
}
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句