R脚本无法读取文件

Question

I have an R script that reads a set of files in a directory. When running it, I run into the error below even though when I read the filename interactively (in the console), it works:

Error in file(file, "rt") : invalid 'description' argument

This is the code that reads the file:

 for(i in 1:length(id_vector)){

     # Pad filename with 0s
     padded_id <- formatC(i, width = 3, format = "d", flag = "0"); 

     location <- paste(getwd(),'/',directory,'/',padded_id,".csv",sep="");

     # Read input file
     data <- read.csv(location);
 }

Answer 1

In place of paste try file.path()

file.path(getwd(),directory,paste(padded_id,".csv", sep=""))