Modifier la taille des points : entrée numérique
Les entrées numériques ont quelques arguments de plus que les champs de texte, comme min et max, qui définissent les nombres minimal et maximal pouvant être choisis.
Notez que lorsque la valeur d'une entrée est consultée dans le code du serveur, Shiny est assez intelligent pour savoir quel type d'entrée a été utilisé et, par conséquent, quel type d'objet il doit retourner. Cela signifie que si vous avez une entrée numérique avec l'identifiant « foo », alors input$foo retournera une valeur numérique.
Cette activité fait partie du cours
Études de cas : créer des applications Web avec Shiny en R
Instructions de l’exercice
Le code de l'application Shiny du dernier exercice est fourni. Votre tâche consiste à ajouter une entrée numérique que l'utilisateur pourra utiliser pour modifier la taille des points sur le graphique. Plus précisément :
- Ajoutez une entrée numérique à l'interface avec l'identifiant « size », l'étiquette « Point size », une valeur par défaut de 1 et une valeur minimale de 1.
- Ajoutez du code au serveur de façon à ce que l'entrée numérique détermine la taille des points dans le graphique (ligne 20).
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# Define UI for the application
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
textInput("title", "Title", "GDP vs life exp"),
# Add a size numeric input
___
),
mainPanel(
plotOutput("plot")
)
)
)
# Define the server logic
server <- function(input, output) {
output$plot <- renderPlot({
ggplot(gapminder, aes(gdpPercap, lifeExp)) +
# Use the size input as the plot point size
geom_point(size = ___) +
scale_x_log10() +
ggtitle(input$title)
})
}
# Run the application
shinyApp(ui = ui, server = server)