细分亚群后注释重命名

不想改ident....


A5IIUDGMX5{A8)TPRAV@$O2.png

library(readxl)
#读入注释文件
mac_inno <- read_excel("mac.inno.xls")
View(mac_inno)
mac_inno <- as.data.frame(mac_inno)
colnames(mac_inno)

[email protected]$seurat_clusters
#match函数有妙用呀!
[email protected]$anno.06.12=mac_inno[match(clusters,mac_inno$clusters),'mouse.anno']
head([email protected]$anno.06.12)
#检查,成功!

你可能感兴趣的:(细分亚群后注释重命名)