From 6e936b5acb98b266ad9c12ff8a8a6381976f383b Mon Sep 17 00:00:00 2001 From: Jeremy Mathews <Jeremy.Mathews@utsouthwestern.edu> Date: Fri, 24 May 2019 08:28:24 -0500 Subject: [PATCH] Fix PDF Legend --- scripts/server.R | 2 +- vizapp/server.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/server.R b/scripts/server.R index ed3c365..f764c96 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 4bb687b..8d5236a 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!")) } } -- GitLab