Başka bir tepkisel ifade ekle
Bir tepkisel ifade başka tepkisel ifadeleri çağırabilir. Bu sayede hesaplamaları modülerleştirir ve TEKRAR tekrar çalıştırılmalarını önlersin. Tepkisel ifadeleri ustalıkla kullanmak, yüksek performanslı Shiny uygulamaları geliştirmek için kritik önemdedir.
Bu egzersizde, BKİ'ye (BMI) göre sağlık durumunu hesaplamak için bir tepkisel ifade kullanacaksın.
Bu egzersiz
R ile Shiny Kullanarak Web Uygulamaları Geliştirme
kursunun bir parçasıdırEgzersiz talimatları
- BKİ durumunu hesaplamak için
rval_bmi_statusadlı bir tepkisel ifade ekle. - Bu tepkisel ifadeyi kullanarak çıktıda BKİ durumu hesaplamalarını değiştir.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
ui <- fluidPage(
titlePanel('BMI Calculator'),
sidebarLayout(
sidebarPanel(
numericInput('height', 'Enter your height in meters', 1.5, 1, 2),
numericInput('weight', 'Enter your weight in Kilograms', 60, 45, 120)
),
mainPanel(
textOutput("bmi"),
textOutput("bmi_status")
)
)
)
server <- function(input, output, session) {
rval_bmi <- reactive({
input$weight/(input$height^2)
})
# CODE BELOW: Add a reactive expression rval_bmi_status to
# return health status as underweight etc. based on inputs
output$bmi <- renderText({
bmi <- rval_bmi()
paste("Your BMI is", round(bmi, 1))
})
output$bmi_status <- renderText({
# MODIFY CODE BELOW: Replace right-hand-side with
# reactive expression rval_bmi_status
bmi_status <- cut(rval_bmi(),
breaks = c(0, 18.5, 24.9, 29.9, 40),
labels = c('underweight', 'healthy', 'overweight', 'obese')
)
paste("You are", bmi_status)
})
}
shinyApp(ui = ui, server = server)