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

[[1]]
[1] "C:/...125872C15278001781_20180417_095231.csv"

[[2]]
[1] "C:/...125872D15309005835_20180516_150200.csv"

[[3]]
[1] "C:/...125872D15314006345_20180516_151817.csv"

[[4]]
[1] "C:/...125872D16178000189_20180516_150743.csv"

[[5]]
[1] "C:/...125872E**16313**000033_20180516_141938.csv"<BR>
[2] "C:/...125872E**16313**000129_20180314_092803.csv"

[[1]]
[1] "C:/...125872C15278001781_20180417_095231.csv"

[[2]]
[1] "C:/...125872D15309005835_20180516_150200.csv"

[[3]]
[1] "C:/...125872D15314006345_20180516_151817.csv"

[[4]]
[1] "C:/...125872D16178000189_20180516_150743.csv"

[[5]]
[1] "C:/...125872E16313000033_20180516_141938.csv"

[[6]]
[1] "C:/...125872E16313000129_20180314_092803.csv"

Fun.tempFile <- function(y){

  tempfileName <- paste0(workingDirectory, "/EEPROM_Dump_*", y, "*.csv", collapse = "")

  tempfileName2 <- Sys.glob(tempfileName, dirmark = FALSE)
  tempfileName2

  return(tempfileName2)
}

dateCodeRange <- as.character(c(begDateJ:endDateJ))

dateCodeFileNamesAll <- (c(lapply(dateCodeRange, Fun.tempFile)))

filenames <- unique(dateCodeFileNamesAll[lapply(dateCodeFileNamesAll,length)>0] )

myData = lapply(filenames, read.csv, header = FALSE)