merged <- merge(obj_list[[1]], obj_list[-1])
merged <- RunPCA(merged, assay = "SCT")
报错如下:
错误于PrepDR(object = object, features = features, verbose = verbose):
Variable features haven't been set. Run FindVariableFeatures() or provide a vector of feature names.
查看合并后的seurat object可以看到详细情况:合并后var.features
是空的,所以RunPCA出错。
合并的object信息
- 解决方法 1:使用
SCT assay
中的scale.data
的行名
VariableFeatures(merged) <- row.names(merged[["SCT"]]$scale.data)
- 解决方法 2:
features <- SelectIntegrationFeatures(object.list = obj_list, nfeatures = 3000)
VariableFeatures(merged) <- features
merged <- RunPCA(merged, assay = "SCT")