Не удается прочитать файл csv

Question

Я новичок в R и у меня есть этот proplem: у меня есть набор файлов csv, каждый из которых имеет 3 столбца с числовыми значениями. Я пытаюсь запустить набор инструкций для создания категорий, которые позволяют мне выравнивать графики каждого из файлов. Это до сих пор мой набор команд:

myFiles<-dir("C:\\Data\\") 
myDeadVols<-as.matrix(read.csv("C:\\Data\\Dead Volumes.csv", header=T, sep="|", row.names=1)) 

myDeadVolsVec <- as.numeric(myDeadVols[,"t2_min"])*60 + as.numeric(myDeadVols[,"t2_s"]) 

names(myDeadVolsVec) <- myDeadVols[,"fileName"] 

sampAnot <- names(myDeadVolsVec) 

names(sampAnot) <- sampAnot 

polyRead <- function(fileNames=NULL, mySep="|"){ 

dataList <- list() 

for(tmpName in fileNames){dataList[[tmpName]] <-as.matrix(read.table(tmpName, header=TRUE, sep=mySep))} 
return(dataList)} 

polyReadMaritza <- function(fileNames=NULL, mySep="|", file2void=NA, fracTime=35, dataPerFrac=173){ 

dataList <- list() 
for(tmpName in fileNames){ 
tmpMat<-as.matrix(read.table(tmpName, header=FALSE, sep=mySep)) 
tmpVoidTime<-file2void[tmpName] 
tmpVoidPoints<-tmpVoidTime/fracTime*dataPerFrac 
tmpAdder<-matrix(ncol=3, nrow=as.integer(tmpVoidPoints), data=0) 
tmpMat<-rbind(tmpAdder, tmpMat) 
tmpEvent<-rep(0, dim(tmpMat)[1]) 
fractMoves<-c(1:length(tmpEvent))[which(c(1:length(tmpEvent))%%dataPerFrac==0)] 
tmpEvent[fractMoves]<-1 
tmpMat[,3]<-tmpEvent 
dataList[[tmpName]] <- tmpMat 
colnames(dataList[[tmpName]])<-c("Distance.mm.", "Absorbance", "Event")} 
return(dataList)} 

До сих пор все, кажется, хорошо, но когда я пытаюсь войти в fllowin команду:

myDataList <- polyReadMaritza(myFiles, mySep="\t", file2void=myDeadVolsVec) 

У меня есть эта ошибка:

Error in file(file, "rt") : cannot open the connection. In addition: Warning message:In file(file, "rt") : cannot open file 'Beads.csv': No such file or directory

Теперь путь к «Beads.csv» - это C: \ Data \ Beads.csv, поэтому я думаю, что это потому, что он не читает полный путь к «Beads.csv» (который является первым из файлов), но я подумал, что с "myFiles < -dir (" C: \ D ata \ ")" Я уже указал путь. Любая помощь приветствуется

Answer 1

Фактически вы получили список файлов в нужном каталоге.

fileDir = 'C:/Data' 
myFiles = list.files(path=fileDir, pattern='*.csv') 

Затем, когда вы звоните read.csv вы должны дать R полный путь файла с ...

for(file in myFiles){ 
    read.csv(file.path(fileDir,file)) 
} 

Answer 2

Значение, возвращенное dir не включают пути. Значение по умолчанию для «full.names» в dir является FALSE, поэтому, если ваш рабочий каталог не является «c: // Data //», вызов read.csv будет отображаться не в нужном месте. Попробуйте:

myFiles <- dir("C:\\Data\\", pattern= "[.]csv", full.names-TRUE)