Konversi tinggi dari inci ke sentimeter
Sebelumnya di bab ini, kita berlatih menghentikan, menunda, dan memicu aplikasi. Ini adalah pola pemrograman yang sangat umum di Shiny yang memungkinkan aplikasi Anda dioptimalkan untuk kecepatan (dan hanya dijalankan ulang ketika sesuatu diperbarui dan pengguna Anda ingin menjalankan ulang aplikasi.)
Dalam latihan ini, Anda akan mempraktikkan beberapa konsep tersebut lagi untuk memastikan Anda benar-benar memahaminya. Alih-alih menghitung BMI, aplikasi ini mengonversi tinggi dalam inci ke sentimeter.
Latihan ini adalah bagian dari kursus
Membangun Aplikasi Web dengan Shiny di R
Petunjuk latihan
- Server: Tunda eksekusi perhitungan tinggi dalam cm hingga pengguna mengeklik tombol 'Show height in cm'.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
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)