数据是以csv格式保存的，现在想批量将数据读取到每个单独的变量中，想请教下如何操作。
就是想实现文件名

filename = list.files(path = Rdata_path, pattern = "*.csv")
obj_R <- list()
for (i in 1:length(filename)){
  obj_R[]<- substr(filename,1,7)
  #想将文件名的字符变为变量名称。
}
obj_R <- do.call(c, obj_R)

charexpress <- "<-read.csv(\""
data_R <- paste0(obj_R, charexpress, obj_R,".csv\")")

#这句话有问题，执行错误
for (i in 1:length(data_R)){
  eval(parse(paste0(obj_R , data_R )))
}

显示错误，没有那个文件或目录。实在不知道怎么解决了。求教。