更改名字 RenameIdents函数

Idents(sce.mergeTEN)#0-20

levels(sce.mergeTEN)#0-20

head(sce.mergeTEN@meta.data)

new.cluster.ids <- c("Malignant 0","Ductal 1","Endothelial 2","Stellate 3","Myeloid 4","Fibroblast 5","Ductal 6",

                    "Fibroblast 7","T cell 8","Malignant 9","Acinar 10","B cell 11","Endothelial 12",

                    "Malignant 13","Endocrine 14","Fibroblast 15","Plasma 16","Ductal 17",

                    "B cell 18 ","Fibroblast 19","Stellate 20")

names(new.cluster.ids) <- levels(sce.mergeTEN)

sce.mergeTEN <- RenameIdents(sce.mergeTEN, new.cluster.ids)

#换了

Idents(sce.mergeTEN)#以上名字

levels(sce.mergeTEN)#以上名字