Převod výšky z palců na centimetry

Dříve v této kapitole jsme si procvičili zastavování, odkládání a spouštění aplikací. Jde o velmi běžný vzor programování v Shiny, díky kterému jsou aplikace optimalizované na rychlost – kód se znovu spustí jen tehdy, když se něco změní a uživatel chce aplikaci přepočítat.

V tomto cvičení si tyto koncepty procvičíš znovu, abys je skutečně zvládl/a. Tentokrát místo výpočtu BMI aplikace převádí výšku v palcích na centimetry.

Toto cvičení je součástí kurzu

Tvorba webových aplikací se Shiny v R

Zobrazit kurz

Pokyny k cvičení

Server: Odlož výpočet výšky v cm tak, aby proběhl až po kliknutí na tlačítko 'Show height in cm'.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

ui <- fluidPage(
  titlePanel("Inches to Centimeters Conversion"),
  sidebarLayout(
    sidebarPanel(
      numericInput("height", "Height (in)", 60),
      actionButton("show_height_cm", "Show height in cm")
    ),
    mainPanel(
      textOutput("height_cm")
    )
  )
)

server <- function(input, output, session) {
  # MODIFY CODE BELOW: Delay the height calculation until
  # the show button is pressed
  rval_height_cm <- reactive({
    input$height * 2.54
  })
  
  output$height_cm <- renderText({
    height_cm <- rval_height_cm()
    	paste("Your height in centimeters is", height_cm, "cm")
    })
}

shinyApp(ui = ui, server = server)

Upravit a spustit kód