блестящий: возможно ли применить два разных размера текста в пределах одного заголовка в tabPanel ()? - PullRequest
Новая
       67

блестящий: возможно ли применить два разных размера текста в пределах одного заголовка в tabPanel ()?

0 голосов
/ 27 апреля 2020

У меня есть следующее tabPanel()

enter image description here

Написано с 

tabsetPanel(id = "something", 
              tabPanel(title = HTML(paste("Gross Total Resection", 
                                          "Simpson Grade I-III", sep = "<br/>")), br(),
                       plotOutput("surv_nom",width = "90%", height="650px")))

Вопрос: Возможно ли применить два разных размера текста в одном и том же tabPanel()-title?

Ожидаемый результат выглядит примерно так:

enter image description here

1 Ответ

1 голос
/ 27 апреля 2020

Вы можете сделать это с помощью HTML функций, см. здесь для получения дополнительной информации. 

library(shiny)

ui <- fluidPage(
  tabsetPanel(
    tabPanel(title = HTML(paste(h4("Gross Total Resection"),
                                p("Simpson Grade I-III", align = "center")
                                )
                          )
             )
  )
)

server <- function(input, output, session) {

}

shinyApp(ui, server)
...