假设一系列的CSV文件存放的路径是“c:/users/xxx/desktop/123"
>library(tidyverse)#基于tidyverse包生成
>files<-dir("c:/users/xxx/desktop/123", pattern = ".csv", full.names = TRUE)#dir()函数是读取文件夹里面文件的地址，这里尤其需要注意的点是括号后面的full.names = TRUE 必须填写，否则返回的值是目录中CSV文件名称而不是地址
>files#查看是否成功读取文件夹中的所有CSV文件地址
>df<-vector("list", length(files))#创建和CSV文件数量相同的空列表
>for(i in seq_along(files)) {
       df[[i]]<-read_csv(files[[i]])
   }                                    #把所有的CSV文件读取出来放入不同的列表集合df中
>d<-bind_rows(df)#把所有的列表按照行进行整理进入一个表格中
or
>d<-bind_cols(df)#把所有的列表按照行整理进一个表格中

更为具体的信息请看《R for Data Sciencce》18版225页16.3.5练习题1
同时这本书的参考答案更具体的网址是https://jrnold.github.io/r4ds-exercise-solutions/   这里的答案和我上面说的版本不一样，这个问题的解答详见习题21.3.1