diff --git a/scripts/server.R b/scripts/server.R index deb49bcc4bbf2dc22e0f25b4cc14a1137cc9dd96..c898ede5998b992358408545921316d3b92fc8df 100644 --- a/scripts/server.R +++ b/scripts/server.R @@ -105,7 +105,7 @@ shinyServer( theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.line = element_line(colour = "black"), legend.position = "none") #cat("printing",gene,"\n") - print(p + facet_wrap( ~ cancer, scales="free") + ggtitle(gene) + theme(plot.title = element_text(hjust = 0.5))) + print(p + facet_wrap( ~ cancer, scales="free") + ggtitle(gene) + theme(plot.title = element_text(hjust = 0.5), legend.position = "none")) incProgress(1/n, detail = paste0("printing plot!")) } } diff --git a/vizapp/server.R b/vizapp/server.R index f2f1b16fff57a70989e5c409c515a9b763a89ec6..68ef97316e546eb763aed43925e3ef3fa115710b 100644 --- a/vizapp/server.R +++ b/vizapp/server.R @@ -105,7 +105,7 @@ shinyServer( theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.line = element_line(colour = "black"), legend.position = "none") #cat("printing",gene,"\n") - print(p + facet_wrap( ~ cancer, scales="free") + ggtitle(gene) + theme(plot.title = element_text(hjust = 0.5))) + print(p + facet_wrap( ~ cancer, scales="free") + ggtitle(gene) + theme(plot.title = element_text(hjust = 0.5), legend.position = "none")) incProgress(1/n, detail = paste0("printing plot!")) } }