Aggiungere input semplici per modificare un grafico
Casi di studio: creare applicazioni web con Shiny in R
Dean Attali
Shiny Consultant
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
App grafico Gapminder
Input di testo
ui <- fluidPage( textInput(inputId = "package", label = "Qual è il tuo pacchetto R preferito?", value = "shiny") )server <- function(input, output) {}shinyApp(ui, server)
str(input$package)
chr "shiny"
Input numerici
numericInput("years", "Da quanti anni usi R?",
value = 4, min = 0, max = 25)
str(input$years)
int 4
Checkbox
checkboxInput("agree", "Accetto termini e condizioni",
value = TRUE)
str(input$agree)
logi TRUE
