Добро пожаловать в stackoverflow!
Вы можете обернуть material_tabs
в div
и задать стиль шрифта-веса:
library(shiny)
library(shinymaterial)
ui <- material_page(
title = "Basic Page + Side-Nav + Tabs",
material_side_nav(fixed = FALSE,
tags$h3("Side-Nav Content")),
div(material_tabs(
tabs = c("First Tab" = "first_tab",
"Second Tab" = "second_tab")
), style = "font-weight: bold;"), # "font-weight: normal;"
material_tab_content(tab_id = "first_tab",
tags$h1("First Tab Content")),
material_tab_content(tab_id = "second_tab",
tags$h1("Second Tab Content"))
)
server <- function(input, output) {}
shinyApp(ui = ui, server = server)