Eu acho que isso é um pouco como uma pergunta de iniciante, mas eu ainda não encontrei uma resposta ou descobri o que estou fazendo de errado.

Eu estou tentando ler 20 arquivos CSV que são armazenados em um diretório separado usando:

setwd("./Data")
filenames <- list.files()  
All <- lapply(filenames,function(i){
  i <- paste(".\\",i,sep="")
  read.csv(i, header=TRUE, skip=4)
})

E recebo o seguinte erro:

Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open file '.\filename.csv': No such file or directory

Onde nome do arquivo representa o nome do primeiro arquivo da minha pasta.

Desde já, obrigado!