在R中读取多个文件时出现问题？

我试图读取1500个csv文件，但我得到以下错误

read.table中出错（文件=文件，标题=标题，sep=sep，quote=quote，： 不允许重复的“行名称”

代码：

fi<-list.files("C:/Users/Desktop/DL/odi_csv_male",full.names=T)
dat<-lapply(fi,read.csv)

---

fread

来自

数据。表

更可靠

试一试

---

或者，如注释所述，选项

row.names=NULL

可能有助于

dat您的文件可能存在格式错误。
lappy（fi，函数（f）{print（f）；read.csv（f）}）
将在读取每个文件时打印出文件名。问题文件中打印的最后一个文件如何解决此问题？请尝试
lappy（fi，read.csv，row.names=NULL）
。它在文件（文件“rt”）中给出错误：无法打开连接。此外：警告消息：在文件（文件“rt”）中：无法打开文件“1000887.csv”：没有这样的文件或目录如果我打开每个文件并将其保存为csv，那么我就可以读取它。它的时间消耗没有错误，但它只读取前20列，因为数据是非结构化的，我的意思是，前20行我只有4列，而在20行之后，数据有25列。它工作正常，但数据s转换为列表。阅读后，我正在绘制它。但现在我无法绘制它的（I in 1:length（fi））{name这会在assign（data.frame（fread（fi[I]，fill=T））、name、.GlobalEnv中产生以下错误：第一个参数无效请参见答案现在应该可以工作了，您应该先给出变量名，然后给出变量本身
The file contains                                                                           version 1.3.0                           
    info    team    Ireland                     
    info    team    England                     
    info    gender  male                        
    info    season  2006                        
    info    date    6/13/2006                       
    info    venue   Civil Service Cricket Club, Stormont                        
    info    city    Belfast                     
    info    toss_winner England                     
    info    toss_decision   bat                     
    info    player_of_match ME Trescothick                      
    info    umpire  R Dill                      
    info    umpire  DB Hair                     
    info    match_referee   CH Lloyd                        
    info    winner  England                     
    info    winner_runs 38                      
    ball    1   0.1 England ME Trescothick  EC Joyce    DT Johnston 0   0
    ball    1   0.2 England ME Trescothick  EC Joyce    DT Johnston 0   0
    ball    1   0.3 England ME Trescothick  EC Joyce    DT Johnston 0   4

library(data.table)
dat<-lapply(fi,fread)

fi<-fi[grepl(".csv",fi)]

dat<-lapply(fi,function(x) fread(x, fill=T))

for(i in 1:length(fi)) {
 name <- paste0("dat",i)
 myvar <- data.frame(fread(fi[i], fill=T))
 assign(name,myvar, .GlobalEnv)
}