Section 6 Supp Fig2

pdf(paste("../out/figures/FigSupp2/Supp2_",Sys.Date(),'.pdf',sep = ''),
    width = 11,height = 3.5)
supp.2 <- plot_grid(p10RNA,p30Tiss,
                    rel_widths = c(1.25,1),labels=c("A","B"))
supp.2
dev.off()

## png 
##   2

supp.2