setwd("GSE29431_RAW") # 进入目录
fileNames <- list.files() # 获取目录下的所有文件
sapply(fileNames, gunzip) # 进行解压操作,fileNames是一个向量,gunzip是解压缩的函数,sapply()会依次将fileNames中的元素应用gunzip函数
setwd("GSE29431_RAW") # 进入目录
fileNames <- list.files() # 获取目录下的所有文件
sapply(fileNames, gunzip) # 进行解压操作,fileNames是一个向量,gunzip是解压缩的函数,sapply()会依次将fileNames中的元素应用gunzip函数
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。