In rstudio/reportsWS: Interactive Reports with R Markdown and Shiny Workshop

numericInput(inputId = "num", label = 
  "Choose a number", value=25, min=1, max=100)

sliderInput(inputId = "nbins", label = 
  "Select number of bins", value=10, min=1, max=100)

data <- reactive({ rnorm(input$num) })

renderPlot({ 
  hist(data(), breaks = input$nbins)
})

rstudio/reportsWS documentation built on May 28, 2019, 5:42 a.m.