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函数
相关文章：