inst/apps/samplesize_determination_attributiv/auswertung/ui_messwert_plot.R

In stephanGit/leistungstests: Supplies Functions to calculate 'leistungstests'

div( class="well  well-sm", style = "margin: 0px;",

     splitLayout(cellWidths = c("90%", "10%"),
                 plotOutput("messwerte_plot", height = 600),

                 verticalLayout(
                   selectInput("scaling_messwerte_plot",
                               label = "Scaling",
                               choices = c("Auto" = "auto", "Fix" = "manual"),
                               width = "100%"),

                   numericInput("mean_max_messwerte", label = "max", value = 100, width = "100%"),

                   numericInput("mean_min_messwerte", label = "min", value = 0, width = "100%"),

                   numericInput("first_obs", label = "first Obs", value = 1, min = 0),

                   numericInput("last_obs", label = "last Obs.", value = 5),

                   actionButton("help_messwerte_plot", label = "Hilfe", width = "100%")
                 )
     )
)