Commit 6356ce6b authored by Gervaise Henry's avatar Gervaise Henry 🤠
Browse files

Remove tsne from stress figs

parent 667b5255
......@@ -772,7 +772,7 @@ scScore <- function(sc10x.l,score,geneset,cut.pt=0.9,anchor=FALSE){
plot7 <- DimPlot(sc10x,reduction="umap",label=TRUE,repel=TRUE)+theme(legend.position="none")+ggtitle("Positive")
plot8 <- DimPlot(sc10x.negative,reduction="umap",label=TRUE,repel=TRUE)+theme(legend.position="none")
plot9 <- DimPlot(sc10x.positive,reduction="umap",label=TRUE,repel=TRUE)+theme(legend.position="none")
grid.arrange(plot1,plot2,plot3,plot4,plot5,plot6,plot7,plot8,plot9,ncol=3)
grid.arrange(plot1,plot2,plot3,plot7,plot8,plot9,ncol=3)
dev.off()
#Generate violin plot of gene exvpression
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment