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
}