Rで複数ファイルを一括で読んで、データフレームに

dt <- do.call("rbind",

lapply(grep("*.csv",list.files("c:\\k-db",full.names=T),value=T),
function(x){read.csv(x,header=F,skip=1)})
)


こんな感じ。
list.filesで、ファイルを取得。full.names=Tで、パスも含めて取得。
grepの引数で、value=Tを取れば、文字列のベクトルの番号でなく、文字列そのものが来る。
do.callで lapplyの返り値のリストを対象に rbindを作用させる。