Commit 699e35fb authored by Gervaise Henry's avatar Gervaise Henry 🤠
Browse files

Merge branch 'develop' into 'PDF_Legend_Issue'

# Conflicts:
#   vizapp/server.R
parents b00495f7 1dc996e1
Pipeline #3989 passed with stages
in 33 seconds
......@@ -332,7 +332,8 @@ 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), legend.position = "none"))
p <- p + facet_wrap( ~ cancer, scales="free") + ggtitle(gene) + theme(plot.title = element_text(hjust = 0.5))
print(p)
#incProgress(1/n, detail = paste0("printing plot!"))
}
}
......@@ -507,11 +508,10 @@ shinyServer(
content = function(file) {
#ggsave(file = file, plot = plotInput(), device = "pdf")
pdf(file, onefile=FALSE)
plotInput()
print(plotInput() + theme(legend.position = "none"))
dev.off()
}
)
}
)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment