diff --git a/scripts/server.R b/scripts/server.R index ed3c3653316abc13a95f7a50eaef41780bd02726..f764c96c59e5c4803c5f590e8ce2028572ea9a2a 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 4bb687b3d7a7dbe1b14b28bc81927394ebedbc04..8d5236ab7cd63d7624364e9e48066744a431711e 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!")) } }