动脉组织-细胞类型markers

## 6.s根据经典markers鉴定细胞类型
Fibroblasts <- c("Pdgfra")
VSMC <- c("Cnn1","Myh11")
EC <- c("Cdh5")
Monocytes <- c("Cd68", "Cd115", "Lyz2")
T_B_cells <- c("Cd3d", "Cd19")
Macrophage_DC <- c("H2-Ab1", "Cd68")
RBC <- c("Hbb")

all_markers <- c("Pdgfra","Cnn1","Myh11","Cdh5","Cd68","Cd115","Lyz2","Cd3d","Cd19","H2-Ab1","Hbb")
VlnPlot(endo, features = all_markers,pt.size = 0)
DotPlot(endo, features = all_markers) + coord_flip()

文献：Single cell analysis of the normal mouse aorta reveals functionally distinct endothelial cell populations

（Circulation. 2019 July 09; 140(2): 147-163.doi:10.1161/CIRCULATIONAHA.118.038362）