如果文件夹中存在文件，则读取它，否则跳过处理部分答案

【问题标题】：If file exists in folder read it else skip the processing part如果文件夹中存在文件，则读取它，否则跳过处理部分
【发布时间】：2014-01-22 22:05:33
【问题描述】：

我正在阅读几个 *.csv，其中名称和路径是在运行时确定的。

但有时有些文件不存在。对于这个文件，我需要一种异常处理。

目前我正在阅读我的文件：

    companyFileName <- paste("C://Users//Prices//",companiesIsin,".csv")
df <- read.csv(gsub(" ","", companyFileName, fixed=TRUE), header = TRUE, sep = ";",stringsAsFactors=FALSE)

当文件夹中不存在该文件时，我收到错误消息。 R中是否有类似异常处理的东西？

感谢您的回复！

【问题讨论】：

标签： r statistics

【解决方案1】：

此代码可用于检查文件是否存在于日期格式为 TRUE 或 FALSE 的文件夹中。

setwd("D:\\FILEFOLDER")

datafile<-file.exists(paste0('DATA_',format(Sys.Date()-1,'%Y%m%d'),'.gz'))

voicefile<-file.exists(paste0('VOICE_TEXT_',format(Sys.Date()-1,'%Y%m%d'),'.gz'))

【讨论】：

【解决方案2】：

您可以使用函数file.exists 检查文件是否存在。因此，您可以在尝试读取文件之前检查文件是否存在以避免错误，例如

if (file.exists(companyFileName))
   df <- read.csv(gsub(" ","", companyFileName, fixed=TRUE), header = TRUE, sep = ";",stringsAsFactors=FALSE)

编辑：您还可以简化路径的创建并使用 read.csv2 作为; 分隔符。这使它更具可读性。

f <- paste0("C://Users//Prices//",companiesIsin,".csv")
if (file.exists(f))
  df <- read.csv2(f, TRUE, stringsAsFactors=FALSE)

【讨论】：

感谢您的回答！顺便说一句，它正在检查哪个路径，因为我总是进入 else 子句。顺便说一句，我在 Windows 7 上运行。