跳过或忽略目录-R中的空csv文件

我在一个目录中有一堆

csv

文件。有些文件是空的。我可以使用以下代码删除空文件：

---

您可以使用

file.size

测试哪些文件的长度为零并跳过这些文件

CSV_Files = dir(pattern="*.csv")
CSV_Files[file.size(CSV_Files) > 0]

model1.csv
var1
1
2
3

model2.csv
var1
10
20
30

model3.csv

model4.csv
var1
100
200
300

model5.csv
var1
1000
2000
3000

CSV_Files = dir(pattern="*.csv")
CSV_Files[file.size(CSV_Files) > 0]