change_color_tab: change_color_tab

In jsga/shinyFiddle: Allows the user to change several properties from elements in a shiny app.

Description

change_color_tab changes the color of the text of a tabPanel in a tabSetPanel

Usage

change_color_tab(tabId, subTabNumber, color)

Details

This function should be used inside server.R of a shiny app.

Author(s)

Javier Saez Gallego

Examples

require(shiny)
require(shinyjs)
require(devtools)
require(shinyColors)

shinyApp(
  ui = fluidPage(
    useShinyjs(),
    mainPanel(
      h4('The colors of the tabs react to the numeric inputs.'),
      tabsetPanel(
        id = "tabSetId",
        tabPanel(
          "Input must be positive",
          numericInput('numPos', label = "This number should be > 0", value = -1)
        )
      )
    )),

  server = function(input, output) {
    observeEvent(input$numPos, {
      # Change the color of the tab when numPos is negative
      if (input$numPos <= 0) {
        change_color_tab("tabSetId", 1, 'red')
      } else{
        change_color_tab("tabSetId", 1, 'black')
      }
    })
  }
)

jsga/shinyFiddle documentation built on May 20, 2019, 2:08 a.m.