mirror of
https://github.com/rstudio/shiny.git
synced 2026-01-30 09:18:33 -05:00
11 lines
166 B
R
11 lines
166 B
R
library(shiny)
|
|
|
|
shinyServer(function(input, output) {
|
|
|
|
output$plot <- reactivePlot(function() {
|
|
obs <- as.integer(input$obs)
|
|
hist(rnorm(obs))
|
|
})
|
|
|
|
})
|