这里分享一种单细胞数据可视化的图形修饰。

先加载一个seurat公共的单细胞数据集

InstallData("pbmc3k")
data("pbmc3k")
PBMC <- pbmc3k.final
PBMC = UpdateSeuratObject(object = PBMC)

一般展示marker基因用这种点图：

Markers <- c('AGER','SCGB3A2','TPPP3','CD68','FCN1','CD1C','CD14','MARCO',
             'CXCR2','IL3RA','CD3D','CD8A','KLRF1','CD79A','MS4A1','S100A8')
DotPlot(PBMC, features = Markers)

额，很普通！

所以修饰修饰，让它看起来更舒服，也对得起测序花的钱。

所幸，发现了一个新的包，可以让他更好：

快用起来吧

文章字数虽少，但不敷衍，东西是实实在在的好东西！