在R Shiny的navbarMenu的所有tabPanel内插入通用文本/框

问题描述

我试图创建一个Rshiny应用程序，但我坚持在navbarmenu的所有选项卡中插入一个公共值。当我尝试将其插入所有甚至不属于navbarMenu的选项卡时。​​ p>

有人可以建议我解决方案吗？比你提前

这是我的代码

 ui <- fluidPage(
  sidebarPanel(
  selectInput("variable","Select an SKU:",materials,selected = '')
),mainPanel(
navbarPage("DEMAND PREDICTION!",theme = shinytheme("flatly"),tabPanel("Home",h1("Time series forecasting"),verbatimtextoutput("summary_1")
           ),tabPanel("Histogram",fluidRow(column(3,wellPanel(selectInput("variable",selected = ''),selectInput("market","Select a market:",choices = NULL)
                                    ))
                    ),mainPanel(
                        plotlyOutput("hist"),h4("Sales per Country"),plotOutput("map")
                    )),navbarMenu("Exploratory Analysis",tabPanel("Line graph",plotlyOutput("exploratory")),tabPanel("Box plot",plotlyOutput("Boxplot")),tabPanel("Seasonal plot",plotlyOutput("seasonal")),"hello")))
           
           )))

这只是我的代码的概述。在这里，我正在尝试在navbarMenu菜单中添加一个公共字段，该字段可以反映在navbarMenu的所有面板中。相反，它显示在甚至不属于navbarMenu的其他选项卡中。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）