Combine the plots from compSCEs
and diffSCEs
into a
single panel.
makeOverallPanel( comp, diff, title = "Overall comparison", row.labels = c("Means", "Variance", "Mean-variance relationship", "Library size", "Zeros per cell", "Zeros per gene", "Mean-zeros relationship") )
comp | list returned by |
---|---|
diff | list returned by |
title | title for the panel. |
row.labels | vector of labels for each of the seven rows. |
Combined panel plot
if (FALSE) { sim1 <- splatSimulate(nGenes = 1000, batchCells = 20) sim2 <- simpleSimulate(nGenes = 1000, nCells = 20) comparison <- compareSCEs(list(Splat = sim1, Simple = sim2)) difference <- diffSCEs(list(Splat = sim1, Simple = sim2), ref = "Simple") panel <- makeOverallPanel(comparison, difference) }