我有一个希望在几个项目中用作模板的shinydashboard。在侧面板中,我有过滤器,因此用户可以创建数据的子集,例如性别。我希望能够在某些项目中隐藏某些过滤器,但仍然可以将输出传递给函数。
例如在ui.r中我有
uiOutput("genderGroup")
我需要从仪表板中的视图中隐藏。
在server.r中我有
output$genderGroup <- renderUI({
checkboxGroupInput("genderFilter",label=h5("Filter by Gender"),
choices =c("Male"= 1, "Female"= 2),
selected =c(1, 2)
)
})
我仍然需要捕获genderGroup复选框的输出,因为几个反应函数需要过滤器作为参数。我试图在ui.r中隐藏uiOutput和隐藏(uiOutput(&#34; genderGroup&#34;)),但在尝试查找输出$ genderFilter的值时,仪表板会挂起。
注意:我使用信息中心作为模板。我不想在项目的基础上重写除项目基础上的某些过滤器的功能。由于所有项目中的数据都包含相同的过滤字段,我只想进入并隐藏项目不需要进行子集化的过滤器。隐藏时,默认选定的值将传递给函数。
由于
安德鲁