isolate() でリアクションを止める

通常は、リアクティブ値を読み取るだけで依存関係が作られ、その値が変わると呼び出し元の式が再実行されます。isolate() 関数を使うと、値が変化しても再実行を引き起こさずに、式がリアクティブ値を読むことができます。

この演習では、isolate() 関数を使ってリアクティブの伝播を止めます。

この演習はコースの一部です

Rで作るShiny Webアプリケーション

コースを見る

演習の手順

サーバーコードを更新し、テキスト出力がユーザーの身長または体重を変更したときだけ更新され、名前を変更しても更新されないようにしてください。

実践的なインタラクティブ演習

このサンプルコードを完成させて、この演習に挑戦してみましょう。

ui <- fluidPage(
  titlePanel('BMI Calculator'),
  sidebarLayout(
    sidebarPanel(
      textInput('name', 'Enter your name'),
      numericInput('height', 'Enter your height (in m)', 1.5, 1, 2, step = 0.1),
      numericInput('weight', 'Enter your weight (in Kg)', 60, 45, 120)
    ),
    mainPanel(
      textOutput("bmi")
    )
  )
)

server <- function(input, output, session) {
  rval_bmi <- reactive({
    input$weight/(input$height^2)
  })
  output$bmi <- renderText({
    bmi <- rval_bmi()
    # MODIFY CODE BELOW: 
    # Use isolate to stop output from updating when name changes.
    paste("Hi", input$name, ". Your BMI is", round(bmi, 1))
  })
}

shinyApp(ui = ui, server = server)

コードを編集して実行