Question

私のUIにはactiveButtonがあり、ユーザーがそれを押すたびに、次のobserveEventメソッドがAPIを呼び出して数値を返します。

observeEvent(input$submit, { 

    url <- "http://my_ip/predict?" 
    value <- paste0('value=', input$value) 

    response <- POST(paste0(url,value)) 

    predicted <- as.numeric(content(response)) 
}) 

問題は、UIのインフォボックスで（変数を「予測」）私は結果を表示したいということですが、予測する場合にのみ値を持っています。したがって、最初にユーザーがボタンを押すまで、そのinfoBoxは非表示にする必要があります。

UIにどのような出力を付ける必要がありますか。 "予測された"ものが入力$値のようにどのようにふるまうことができましたか？

ありがとうございます。

APIを呼び出すときに解決策が機能reactiveValues()を使用していた

EDIT：前の値に基づいて機能renderInfoBox()を使用して

reactiveValues <- reactiveValues() 
reactiveValues$predicted <- as.numeric(content(response)) 

そして、。それに対する応答を追加する

使用reactiveValues：上記のコメントから、これを更新するには

Answer 1

。要素を表示＆非表示にする -

reactiveValues$predicted <- as.numeric(content(response))

その後、infoBox