More exploration of the Gapminder data
To use the gapminder data in a Shiny app, you will often have to filter the dataset in order to retain only a subset of the rows. You can use the subset() function for that.
この演習はコースの一部です
Case Studies: Building Web Applications with Shiny in R
演習の手順
You are given a Shiny app that contains an empty text output. Your task is to:
- Load the
gapminderpackage. - Determine the population of France in year 1972 using the
subset()function, and display that number in the text output (line 14).
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Load the gapminder package
___
# Define UI for the application
ui <- fluidPage(
"The population of France in 1972 was",
textOutput("answer")
)
# Define the server function
server <- function(input, output) {
output$answer <- renderText({
# Determine the population of France in year 1972
subset(___ & ___)$___
})
}
# Run the application
shinyApp(ui = ui, server = server)