Rで複数のcsvファイルを読み込む

フォルダ内の連番になっているcsvファイルをRで一気に読み込み、それぞれ別のデータフレームに入れたい。（例えば年代別とか都道府県別とか）

001_01.csv~001_10.csv

この10個のファイルをまとめて読み込む

setwd("C:/データがある場所")
files <- list.files(path = "C:/データがある場所",full.names = T)

for(i in 1:length(files)){
  i <- formatC(i, width = 2, flag = "0") #iを01~10にする
  df <- paste("001_", i, ".csv", sep = "") #dfが001_01.csv~001_10.csvと変化するようにする
  eval(parse(text=paste("data", i, "<-read.csv('", df, "')", sep=""))) #evalで文字列を実行する
}

実行するとdata01に001_01.csvのデータ、data02に001_02.csvのデータって感じになる。
もっとスマートな方法あるかも