inst/EDAnalytix/ui_10ProductSalesDist.R

In BrutishGuy/EDAnalytix: Interactive Plotting and Data Analysis

fluidPage(
  # supress error messages in app
  tags$style(
    type = 'text/css',
    ".shiny-output-error{ visibility: hidden;}",
    ".shiny-output-error:before { visibility:hidden; }"
  ),
  source("./ui_CustomError.R", local = T)[1],
  fluidRow(conditionalPanel(
    "output.ValPlots",
    box(
      withSpinner(plotlyOutput("ProductSalesDist", height = 450, width = 850)),
      width = 10
    ),
    box(
      uiOutput("MultiProductSelect"),
      width = 2
    )
  ))
)