R Shiny - 在 Reactive 內部使用 eventReactive output

Question

如果單擊變基按鈕（輸入$變基），我正在嘗試變基。 如果它沒有被點擊，那么我希望代碼繼續 value_new 只是價值。 但如果它被點擊，那么我想使用來自 rebasesomething 的 output 即，我希望 value_new 為 value * 0.5。

我怎樣才能做到這一點？ 我嘗試了 ifexists 以查看 function 是否具有 output （即，如果已單擊按鈕並且某些 output 似乎不起作用），但似乎不起作用。 關於如何做到這一點的任何其他想法？

很抱歉沒有給出一個可行的例子，但是代碼很大，只是希望有人能指導我正確的方向。

reactive({
     value <- input$value

     value_new<-value

     ifexists(rebasesomething()){value_new<-value*rebasesomething()}
 
#do a whole bunch of other things with value_new
})


rebasesomething <- eventReactive(input$rebase,{
      
      temp<-0.5
      temp
    })

Answer 1

找到解決方案，可以使用 if(input$rebase) 來判斷按鈕是否被點擊：

if (input$rebase){
      
      value_new<-value*rebaselist()
      
    }
    else {
      value_new<-value
      
    }