代码语言：txt复制
fs = dir("GSExxx_RAW/")#列出一个文件夹下的所有文件
re = list() #生成一个空列表re，每一轮for循环会向re中添加一个元素法1：for循环
代码语言：txt复制for(i in 1:length(fs)){
re[[i]] = read.delim(paste0("GSExxx_RAW/",fs[i]),row.names = 1)
}
re2 = do.call(cbind,re) #把re的所有元素cbind到一起法2：隐式循环 自定义函数
代码语言：txt复制re = lapply(fs, function(f){
read.delim(paste0("GSExxx_RAW/",f),row.names = 1)
})
re2 = do.call(cbind,re) #把re的所有元素cbind到一起生信技能树小洁老师
