在R导入期间重命名.csv文件

Question

我不确定如何继续以下操作。我有179个.csv文件，我想导入R作为数据帧。这些文件名为xxx _ #### - #### _ xxx，其中x代表不同的字母，＃代表不同的数字。当我想对文件执行操作时出现问题，因为R将#### - ####识别为等式。理想情况下，我想从文件名中删除#### - 。

要导入许多.csv文件，我通常使用以下脚本：

path <- paste0(getwd(), "/")
files <- list.files(path=path, pattern="*.csv")
for(file in files)
{
  perpos <- which(strsplit(file, "")[[1]]==".")
  assign( gsub(" ","",substr(file, 1, perpos-1)), 
          read.csv(paste(path,file,sep="")))
}

这是我的文件名示例：BEMI-Mod1_1969-2015_Details_Plant_4_2015.csv。我有1969-2015部分文件名的问题。上面的脚本允许我将所有文件导入R作为文件名。然后，当我想操纵文件时，我收到以下错误：

> BEMI-Mod1_1969-2015_Details_Plant_4_2015
Error: unexpected input in "BEMI-Mod1_1969-2015_"