Commit 2b153196 authored by dmattek's avatar dmattek

Removed legend position control

parent aa825c82
...@@ -32,17 +32,6 @@ modAUCplotUI = function(id, label = "Plot AUC distributions") { ...@@ -32,17 +32,6 @@ modAUCplotUI = function(id, label = "Plot AUC distributions") {
), ),
column( column(
4, 4,
selectInput(
ns('selPlotLegendPos'),
label = 'Legend position',
choices = list(
"Top" = 'top',
"Right" = 'right',
"Bottom" = 'bottom'
),
width = "120px",
selected = 'top'
),
radioButtons(ns("rBAxisLabelsRotate"), "X-axis labels", radioButtons(ns("rBAxisLabelsRotate"), "X-axis labels",
c("horizontal" = 0, c("horizontal" = 0,
"45 deg" = 45, "45 deg" = 45,
...@@ -227,8 +216,7 @@ modAUCplot = function(input, output, session, ...@@ -227,8 +216,7 @@ modAUCplot = function(input, output, session,
in.font.axis.title = PLOTFONTAXISTITLE, in.font.axis.title = PLOTFONTAXISTITLE,
in.font.strip = PLOTFONTFACETSTRIP, in.font.strip = PLOTFONTFACETSTRIP,
in.font.legend = PLOTFONTLEGEND) + in.font.legend = PLOTFONTLEGEND) +
theme(legend.position = input$selPlotLegendPos, theme(axis.text.x = LOCrotatedAxisElementText(as.numeric(input$rBAxisLabelsRotate),
axis.text.x = LOCrotatedAxisElementText(as.numeric(input$rBAxisLabelsRotate),
size = PLOTFONTAXISTEXT)) size = PLOTFONTAXISTEXT))
......
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