FA
Size: a a a
FA
АЧ
FA
FA
FA
АЧ
KD
a
ГД
АЧ
ИП
DD
conditionalPanel(condition = "input.display_param_input == 'first_type'",
ns = ns,
plotly::plotlyOutput(outputId = ns( "plotly")))
conditionalPanel(condition = "input.display_param_input != 'first_type'",
ns = ns,
plotOutput( outputId = ns( "plot"),
height = "600px"))
out_id <- ifelse(input$display_param_input == "first_type",
"plotly",
"plot")
output[[out_id]] <- some_plot_gen_function(input_data, input$display_param_input) # пишет в аутпут график либо плотли, либо просто плот
AP
conditionalPanel(condition = "input.display_param_input == 'first_type'",
ns = ns,
plotly::plotlyOutput(outputId = ns( "plotly")))
conditionalPanel(condition = "input.display_param_input != 'first_type'",
ns = ns,
plotOutput( outputId = ns( "plot"),
height = "600px"))
out_id <- ifelse(input$display_param_input == "first_type",
"plotly",
"plot")
output[[out_id]] <- some_plot_gen_function(input_data, input$display_param_input) # пишет в аутпут график либо плотли, либо просто плот
DD
some_plot_gen_function(input_data, input$display_param_input)
поскольку это весьма громоздкая функция.AP
some_plot_gen_function(input_data, input$display_param_input)
поскольку это весьма громоздкая функция.Ю
PU
БА
ЭА