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
6e936b5a
Commit
6e936b5a
authored
May 24, 2019
by
Jeremy Mathews
Browse files
Fix PDF Legend
parent
e9d24e22
Pipeline
#3973
passed with stages
in 24 seconds
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
scripts/server.R
View file @
6e936b5a
...
...
@@ -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!"
))
}
}
...
...
vizapp/server.R
View file @
6e936b5a
...
...
@@ -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!"
))
}
}
...
...
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