title: Nested Conditional Panels in Shiny R
body: <p>Hey Im trying to nest ConditionalPanels within ConditionalPanels. The output is showing everything in the first Conditional panel and completely disregarding the conditional panels within. 
  Desired flow of Output: Choose Marketing(SMS or Email) -> Auto or Manual -> Either Auto or Manual layout (not both). <a href="https://i.stack.imgur.com/seeT9.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/seeT9.png" alt="Current Output"></a><br>
      sidebarLayout(
      sidebarPanel(
      fluid = TRUE,
      width = 3,</p>
  
  <pre><code>h3("Marketing", style = "align:center;text-align:center;text-shadow: 2px
     2px #FFFFFF"),
  hr(style = "border-top: dotted 1px #FFFFFF"),
  
  #################################################################################################
  selectInput(
    "WeekdayMarketingChoice",
    "Please Select Marketing Type",
    choices = c("Email Marketing" = "emailMarketing", "SMS Marketing" =
                  "smsMarketing"),
    2
  ),
  
  
  br(),
  
  ####  Mai ConditionalPanel for SMS Marketing
  conditionalPanel(
    condition = "input.WeekdayMarketingChoice == 'smsMarketing'",
    selectInput(
      "automanualsms",
      "Auto or Manual",
      choices = c("Automatic", "Manual"),
      1
    )
    ,
    #nested conditionalpanel
    conditionalPanel(
      "input.automanualsms" == "Manual",
      uiOutput("dayFilterControlForSMS"),
      helpText("Note: SMS will be sent to all customers on selected Days"),
      br(),
      textAreaInput(
        "textSmsMarketingWeekday",
        "Enter campaign text or offers to send: ",
        "Sms Marketing Text",
  
        "100%",
        "100px",
        resize = "vertical"
      ),
      helpText("Note: Enter a custom offer that you want to send!"),
      br(),
  
      actionButton(
        "manualSmsCampaign",
        " Launch SMS Campaign",
        icon("envelope"),
        style = "color: #fff; background-color: #337ab7; border-color:
        #2e6da4; width: 100%; padding-left: 2dp: margin-right: 5px"
      )
    ),
    hr(),
    ##nested conditional panel #2
    conditionalPanel(
      "input.automanualsms" == "Automatic",
  
      actionButton(
        "maxSmsCampaign",
        "Campaign for Max Revenue Day",
        style =
          "color: #fff; background-color: #6C7A89; border-color:
        #C0C0C0; width: 100%; padding-left: 2dp: margin: 5dp;"
      ),
      helpText("Note: Campaigns will lauch for day with Max Revenue"),
  
      br(),
      actionButton(
        "minSmsCampaign",
        "Campaign for Min Revenue Day",
        style =
          "color: #fff; background-color: #6C7A89; border-color:
        #C0C0C0; width: 100%; padding-left: 2dp: margin: 5dp;"
      ),
  
      helpText("Note: Campaigns will lauch for day with Max Revenue")
    )
  )
  ,
  
  #### Main Conditional Panel for Email Marketing
  conditionalPanel(
    condition = "input.WeekdayMarketingChoice == 'emailMarketing'",
    selectInput(
      "automanualemail",
      "Auto or Manual",
      choices = c("Automatic", "Manual"),
      1
    )
    ,
    #nested conditional panel #1
    conditionalPanel(
      "input.automanualemail" == "Manual",
  
  
      uiOutput("dayFilterControlForEmail"),
      helpText("Note: Emails will be sent to all customers on selected Days"),
      br(),
      textAreaInput(
        "textEmailMarketingWeekday",
        "Enter campaign text or offers to send: ",
        "Special Discount Offers!",
        "100%",
        "100px",
        resize = "vertical"
      ),
      helpText("Note: Enter a custom offer that you want to send!"),
      br(),
  
      actionButton(
        "manualEmailCampaign",
        "Launch Email Campaign",
        icon("envelope"),
        style = "color: #fff; background-color: #337ab7; border-color: #2e6da4;
        width: 100%; padding-left: 2dp: margin: 5dp;"
      )
      ),
    hr(),
    #helpText("Note: Max and Min Campaigns"),
    # nested conditional panel #2
    conditionalPanel(
      "input.automanualemail" == "Automatic",
      actionButton(
        "maxEmailCampaign",
        "Campaign for Max Revenue Day",
        style =
          "color: #fff; background-color: #6C7A89; border-color:
        #C0C0C0; width: 100%; padding-left: 2dp: margin: 5dp;"
      ),
      helpText("Note: Campaigns will lauch for day with Max Revenue"),
  
  
      br(),
      actionButton(
        "minEmailCampaign",
        "Campaign for Min Revenue Day",
        style =
          "color: #fff; background-color: #6C7A89; border-color:
        #C0C0C0; width: 100%; padding-left: 2dp: margin: 5dp;"
      ),
      helpText("Note: Campaigns will lauch for day with Min Revenue"),
      br()
    )
  
    )
  ),
  </code></pre>