R：无法打开文件“ specdata / 001.csv”：没有此类文件或目录

Question

我是R的新手，在广泛研究了此错误之后，我仍然找不到解决方案。 我在R中创建的函数是确定包含332个.csv文件的目录中的完整情况。

complete <- function(directory, id = 1:332) {
  s <- vector()
  for (i in 1:length(id)) {
    path <- c(paste(directory, "/",formatC(id[i], width=3, flag=0),".csv",sep=""))   
    data <- c(read.csv(path)) 
    s[i] <- sum(complete.cases(data))
  } 
  dat <- data.frame(cbind(id,nobs=s))   
  return(dat)
}

当我想测试该功能时，通过给出以下命令（specdata是.csv文件的存储目录）

complete("specdata", 1)

我不断收到以下错误：

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

• 我已经检查了我的工作目录
• 我检查了目录中的文件，但在那里无法检测到任何问题。

Answer 1

发生这种情况是因为您的工作目录未设置为包含文件的位置。 这也发生在我身上。 我通过在函数中对目录的位置进行硬编码来解决这个问题。

complete<-function(directory,id=1:332)
{
  directory=file.path(getwd())
  observations=0
  counts = c()
  for(i in id)
  {
    name=sprintf("%03d.csv", i)
    data<-read.csv(name, sep="",header= T,na.strings=c("NA","NAN",""))
    data=na.omit(data)
    counts=append(counts, nrow(data))
  }


  df <- data.frame(id=id, nobs=counts)
  df
}