Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
BICF
Astrocyte
tcga_shiny
Commits
699e35fb
Commit
699e35fb
authored
May 24, 2019
by
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
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
vizapp/server.R
View file @
699e35fb
...
...
@@ -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
()
}
)
}
)
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment