R 语言 批量导入从数据库中下载的scRNA

R语言

library(Seurat)

#从数据库里下载的文件绝对路径
path <- 'D:\下载\单细胞/GSE221575_RAW/'

fs = list.files(path,pattern = '^GSM')
samples <- substr(fs,1,10)
lapply(unique(samples