Explorer un ensemble de données avec Shiny

Études de cas : créer des applications Web avec Shiny en R

Dean Attali

Shiny Consultant

Explorer un ensemble de données avec Shiny

Ensemble de données

+ Environnement interactif

+ Afficher les données

+ Filtrer les données

+ Télécharger les données

= Application Shiny

Études de cas : créer des applications Web avec Shiny en R

Visualiser les données en tableau

country continent year lifeExp pop gdpPercap
Afghanistan Asia 1952 28.801 8425333 779.445315
Afghanistan Asia 1957 30.332 9240934 820.85303
Afghanistan Asia 1962 31.997 10267083 853.10071
Afghanistan Asia 1967 34.02 11537966 836.197138
Afghanistan Asia 1972 36.088 13079460 739.981106
Afghanistan Asia 1977 38.438 14880372 786.11336
Afghanistan Asia 1982 39.854 12881816 978.011439
Afghanistan Asia 1987 40.822 13867957 852.39595
Afghanistan Asia 1992 41.674 16317921 649.34140
Afghanistan Asia 1997 41.763 22227415 635.34135
Études de cas : créer des applications Web avec Shiny en R

Tableaux dans Shiny

  • Les tableaux sont des sorties

    • Les sorties utilisent des fonctions d'espace réservé dans l'UI :
    tableOutput("my_table")
    
    • Les sorties utilisent des fonctions render dans le serveur :
    output$my_table <- renderTable({
        gapminder
    })
    
Études de cas : créer des applications Web avec Shiny en R

Filtrer les données du tableau

  • Les entrées peuvent servir à filtrer

    • Ajouter une entrée à l'UI :
    selectInput("country", "Country",
                choices = levels(gapminder$country))
    
    • Filtrer les données avec l'entrée :
  output$my_table <- renderTable({
      subset(gapminder, country == input$country)
  })
Études de cas : créer des applications Web avec Shiny en R

Choix d'une entrée select

  • L'argument choices de selectInput() peut être toute liste de chaînes

    • choices peut être un sous-ensemble de la variable
    selectInput("country", "Country",
                choices = levels(gapminder$country)[1:10])
    
    • choices peut être étendu pour ajouter de nouvelles valeurs
    selectInput("country", "Country",
                choices = c("any", levels(gapminder$country)))
    
Études de cas : créer des applications Web avec Shiny en R

Passons à la pratique !

Études de cas : créer des applications Web avec Shiny en R

Preparing Video For Download...