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 merupakan bagian dari kursus
Membangun Aplikasi Web dengan Shiny di R
Instruksi latihan
- Server: Tunda eksekusi perhitungan tinggi dalam cm hingga pengguna mengeklik tombol 'Show height in cm'.
Latihan interaktif langsung praktik
Cobalah latihan ini dengan melengkapi kode contoh ini.
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)