然后,当选择器输入组件的右框为空时,应禁用Next按钮(灰色)。只有当用户在正确的框中至少有一个选择时,才能启用Next按钮,并且用户可以单击它。ui.R和scep.r重新创建我的问题。(不过,我将将该解决方案实现到一个更大、更复杂的GUI中。)代码使用shinyBS,因此您首先需要安装包并加载库。ButtonNext", disabled = FALSE)
})) # End of observeEvent
我希望能够看到代码中的reactive({...})部件内部发生了什么。我认为使用shinytest可以执行使用Shiny Modules并了解callModule的部分应用程序。我尝试在我的代码中记录/跟踪/打印以下内容。print("hello1")cat(file=stderr(), "hello3")runtest.R
li