Modules isolation

• output$out will never get updated because there is no input$bins
• The bins input can only be seen inside of the hist1 module.

ui <- fluidPage(
  histogramUI("hist1"),
  textOutput("out")
)
server <- function(input, output, session) {
  histogramServer("hist1")
  output$out <- renderText(paste0("Bins: ", input$bins))
}