根据条件在R中显示/隐藏selectinput

我试图使用条件在一个闪亮的应用程序中显示或隐藏selectinputs，基于该选项卡是否在UI中可用。因此，在标题为“产品使用”的选项卡面板上，应该可以看到“产品类别”下的所有下拉列表，否则只能看到“产品类别”下的第一个下拉列表

以下是我正在做的事情，但没有达到工作条件：

#这是闪亮web应用程序的服务器逻辑。
#您可以在此处找到有关使用Shiny构建应用程序的更多信息：
#
# http://shiny.rstudio.com
#
图书馆（闪亮）
图书馆（shinydashboard）
图书馆（shinyBS）
图书馆（knitr）
图书馆（kableExtra）
图书馆（闪亮）
图书馆（shinythemes）
ui%
可折叠样式（“条纹”，全宽=F）
}
产出$2%
knitr:：kable（“html”）%%>%
kable_样式（引导选项=c（“条纹”、“悬停”、“浓缩”、“响应”））
}
输出$消耗%
knitr:：kable（“html”）%%>%
可折叠样式（“条纹”，全宽=F）
}
输出$consumption_flav%
knitr:：kable（“html”）%%>%
可折叠样式（“条纹”，全宽=F）
}
}
shinyApp（ui=ui，server=server）

如果您只想在“产品使用”选项卡上显示“产品类别”菜单，可以将您的条件设置为：

condition = "input.tabBox_next_previous  == 'product_use'",

从

？条件面板
：

条件

一个JavaScript表达式，将重复计算以确定是否应显示面板

在JS表达式中，可以引用包含当前输入和输出值的输入和输出JavaScript对象。例如，如果您有一个id为foo的输入，则可以使用input.foo读取其值。（请确保不要修改输入/输出对象，因为这可能会导致不可预测的行为。）

实际上，我希望产品类别菜单总是显示出来。但该菜单下的两个选择输入仅在tab==product\u使用时显示