R閃亮單選按鈕

Question

我是一位新來的R閃亮人物，在R閃亮的建築應用。我想根據out1變量提供兩個不同輸出的表格。對於這一點，我寫

output$inputs <- renderDataTable({ 
    if((input$O1 == 'Max_profit')) 
    inpts() 
    }) 
    output$inputs <- renderDataTable({ 
    if ((inputs$O1 == 'Optimum_profit')) 
    inpts1() 
    }) 

當我按在UI的操作按鈕，我看不到任何UI輸出。它顯示未找到對象輸入。

我搜索了互聯網，但找不到任何東西。請幫助我。

Answer 1

你有2個同名的div。您可以重命名它們，也可以將您的if聲明包裝爲反應式或將所有條件合併爲一個表達式：

output$inputs <- renderDataTable({ 
     if(is.null(nput$O1)){ 
       return() 
     } 
     if(input$O1 == 'Max_profit'){ 
       inpts() 
     } 
     if(inputs$O1 == 'Optimum_profit'){ 
       inpts1() 
     } 
})