在R中以循环方式读取csv文件

我正在尝试使用R读取计算机文件夹中的CSV文件。这是我正在使用的代码：

首先，我使用CSV模式创建一个包含文件名的列表。列表中的元素采用chr格式。 其次，我在文件上循环，并在R中为每个文件创建一个数据帧

files = list.files(pattern="*.csv")

> dput(files)
c("USC00020098.csv", "USC00020104.csv", "USC00020170.csv", "USC00020307.csv", 
"USC00020406.csv", "USC00020482.csv", "USC00020487.csv", "USC00020490.csv", 
"USC00020492.csv", "USC00020494.csv", "USC00020625.csv", "USC00020632.csv", 
"USC00020670.csv", "USC00020675.csv", "USC00020678.csv", "USC00020758.csv", 
"USC00020808.csv", "USC00020810.csv", "USC00021161.csv", "USC00021193.csv", 
"USC00021419.csv", "USC00021614.csv", "USC00021654.csv", "USC00021749.csv", 
"USC00022193.csv", "USC00022705.csv", "USC00022927.csv", "USC00023082.csv", 
"USC00023185.csv", "USC00023190.csv", "USC00023448.csv", "USC00023498.csv", 
"USC00023500.csv", "USC00023501.csv", "USC00023505.csv", "USC00023573.csv", 
"USC00023621.csv", "USC00023643.csv", "USC00023828.csv", "USC00023926.csv", 
"USC00024069.csv", "USC00024182.csv", "USC00024345.csv", "USC00024391.csv", 
"USC00024453.csv", "USC00024508.csv", "USC00025312.csv", "USC00025467.csv", 
"USC00025512.csv", "USC00025560.csv", "USC00025635.csv", "USC00025700.csv", 
"USC00025765.csv", "USC00025780.csv", "USC00025825.csv", "USC00026037.csv", 
"USC00026244.csv", "USC00026246.csv", "USC00026315.csv", "USC00026320.csv", 
"USC00026321.csv", "USC00026424.csv", "USC00026476.csv", "USC00026571.csv", 
"USC00026603.csv", "USC00026653.csv", "USC00026796.csv", "USC00026840.csv", 
"USC00027081.csv", "USC00027131.csv", "USC00027143.csv", "USC00027281.csv", 
"USC00027466.csv", "USC00027661.csv", "USC00027708.csv", "USC00027716.csv", 
"USC00027720.csv", "USC00027741.csv", "USC00027876.csv", "USC00028112.csv", 
"USC00028214.csv", "USC00028273.csv", "USC00028326.csv", "USC00028489.csv", 
"USC00028494.csv", "USC00028499.csv", "USC00028500.csv", "USC00028647.csv", 
"USC00028649.csv", "USC00028650.csv", "USC00028653.csv", "USC00028904.csv", 
"USC00028940.csv", "USC00029015.csv", "USC00029158.csv", "USC00029271.csv", 
"USC00029367.csv", "USC00029534.csv", "USC00029622.csv", "USC00029626.csv", 
"USW00003192.csv", "USW00023183.csv", "USW00023184.csv", "USW00053019.csv", 
"USW00053156.csv", "USW00053160.csv", "USW00093139.csv", "USW00093140.csv"
)

for(i in seq_along(files)){
  
  name <- files[[i]]
  y <- read.csv(file=name,header=TRUE)
  assign(name,y)
}

---

当我运行例如：

t时，我会检查循环失败的文件，看看它是否真的是空的…我如何检查R中的文件是否有错误？当循环失败时，只需键入
I
并按enter键。。。或者，将
print（i）
放入循环中。谢谢，我发现了错误！
Error in read.table(file = file, header = header, sep = sep, quote = quote,  : 
  first five rows are empty: giving up