Bei dieser Herausforderung wollen wir das Erscheinungsbild einer Shiny-Anwendung mithilfe von verbessern tabsetPanels. Unser Ziel ist es, eine Benutzeroberfläche zu erstellen, bei der das ausgewählte Bedienfeld einen weißen Text auf schwarzem Hintergrund aufweist, während die inaktiven Registerkarten einen weißen Hintergrund mit schwarzem Text beibehalten.
Unten finden Sie den verwendeten Code Zur Veranschaulichung der Lösung:
library(shiny) ui <- shinyUI( fluidPage( tags$style(".nav-tabs { background-color: #006747; } .nav-tabs-custom .nav-tabs li.active:hover a, .nav-tabs-custom .nav-tabs li.active a { background-color: transparent; border-color: transparent; } .nav-tabs-custom .nav-tabs li.active { border-top-color: #FFF; }"), tabsetPanel( tabPanel( title = "Hello", textInput(inputId = "text", label = "Input") ), tabPanel( title = "World" ) ) ) ) server <- shinyServer(function(input, output, session){ }) shinyApp(ui=ui, server=server)
Die Lösung bietet eine optisch ansprechende Anwendung, bei der die aktive Registerkarte mit einem schwarzen Hintergrund und weißem Text hervorgehoben wird. Die inaktiven Tabs bleiben durch ihren weißen Hintergrund und schwarzen Text gut erkennbar.
Da Shiny CSS-Änderungen mit der Zeit dazu neigen, sich zu ändern, ist es wichtig, den Code entsprechend anzupassen. Die in dieser Lösung dargelegten Grundprinzipien sollten jedoch weiterhin den Anpassungsprozess leiten.
Das obige ist der detaillierte Inhalt vonWie kann ich Tab-Farben im tabPanel von Shiny anpassen?. Für weitere Informationen folgen Sie bitte anderen verwandten Artikeln auf der PHP chinesischen Website!