Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Guillaume Perréal
easy16S
Commits
6f478fa6
Commit
6f478fa6
authored
Dec 04, 2018
by
Midoux Cedric
Browse files
Revert "plot size button"
This reverts commit
9325f7cc
.
parent
96394afa
Changes
2
Hide whitespace changes
Inline
Side-by-side
server.R
View file @
6f478fa6
...
...
@@ -156,54 +156,8 @@ shinyServer
validate
(
need
(
data16S
(),
""
))
tags
$
div
(
style
=
"text-align:center"
,
title
=
"Download file as RData"
,
downloadButton
(
"downloadData"
,
"Download RData file"
,
style
=
"color: black; background-color: gray90"
)
)
})
observeEvent
(
input
$
plotSize
,
{
showModal
(
modalDialog
(
title
=
"Setting plot size"
,
numericInput
(
"plotWidth"
,
label
=
"Plot width : "
,
value
=
6
,
min
=
1
,
max
=
50
),
numericInput
(
"plotHeight"
,
label
=
"Plot height : "
,
value
=
6
,
min
=
1
,
max
=
50
),
radioButtons
(
"plotUnits"
,
label
=
"Units : "
,
choices
=
list
(
"in"
,
"cm"
,
"mm"
),
selected
=
"cm"
,
inline
=
TRUE
),
numericInput
(
"plotDPI"
,
label
=
"Plot resolution : "
,
value
=
300
,
min
=
70
,
max
=
500
,
step
=
10
),
selectInput
(
"plotDevice"
,
label
=
"Plot device : "
,
choices
=
list
(
"eps"
,
"ps"
,
"tex"
,
"pdf"
,
"jpeg"
,
"tiff"
,
"png"
,
"bmp"
,
"svg"
),
selected
=
"pdf"
),
size
=
"s"
,
easyClose
=
TRUE
,
footer
=
NULL
)
title
=
"Download as RData"
,
downloadButton
(
"downloadData"
,
"Download"
,
style
=
"color: black; background-color: gray90"
)
)
})
...
...
ui.R
View file @
6f478fa6
...
...
@@ -76,12 +76,7 @@ shinyUI(dashboardPage(
# placeholder = "data.fasta"
# )
# ),
hr
(),
uiOutput
(
"downloadUI"
),
tags
$
div
(
align
=
"center"
,
actionButton
(
"plotSize"
,
label
=
"Plot size"
)
)
uiOutput
(
"downloadUI"
)
),
dashboardBody
(
tabsetPanel
(
...
...
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