Seurat2 FeaturePlot主题调整

对Seurat V2 FeaturePlot画出的点图进行theme调整

plot.list <- FeaturePlot(lung.integrated, 
features.plot=c("Cxcl1","Cxcl10","Cxcl16",'Il6','Tnf','Il1a','Il1b'), 
min.cutoff="q9", cols.use=c('lightgray','red3'), pt.size=0.5, 
reduction.use='umap', do.return=T, no.axes = TRUE, no.legend = TRUE)
dev.off()

for (each.plot in names(plot.list)){
    plot.list[[each.plot]] <- plot.list[[each.plot]] + 
theme(plot.title=element_text(size=14,face="bold",hjust=0.5), 
panel.background=element_rect(fill=NA))
}

png(file="inflammation.chemokines.umap.png",width=12, height=6,res=300, units='in')
cowplot::plot_grid(plotlist=plot.list, ncol=4)
dev.off()