Shiny 在DT数据表选项中写入If条件？

很抱歉不能提供一个可复制的示例，但下面是我的datatable的选项。基本上，如果按下屏幕截图按钮-我不希望启用滚动功能-否则应该启用。感谢您的帮助或建议！if语句最初的计算结果为false，但默认情况下仍禁用滚动功能

还有，有人知道生命的意义吗

 ` options = list(dom = 't', paging = FALSE, ordering = FALSE, 
                               #pageLength = -1, 
                               if(input$screenshot > 0){
                                 scrollY=NULL
                               } else {
                                 scrollY='50vh'
                               }
                               , scrollCollapse = TRUE`

---

保持简单。在DT渲染器外部，观察者内部，将

if

条件写入反应变量。另外，我建议您使用一个操作按钮，而不是屏幕截图。这将允许您启用和禁用滚动，而不是完全禁用滚动

# You initialize the table with scrolling enabled
react <- reactiveValues(scrollCondition="50vh")

# Toggle button returns TRUE when enabled and FALSE when disabled. So when screenshots are set to TRUE, we make the scrollY property NULL.
observeEvent(input$screenshot,{
       if(input$screenshot==TRUE){
                 react$scrollCondition <- NULL
       }else{
                 react$scrollCondition <- "50vh'"
       }
})


`options = list(dom = 't', paging = FALSE, ordering = FALSE, 
                               scrollY= react$scrollCondition, 
                               scrollCollapse = TRUE`

#在启用滚动的情况下初始化表格
react此功能非常好，感谢您的帮助！“如果我不是堆栈溢出的新手，我会投票支持你的回答。”大卫很乐意帮忙！