Визуализировать суб / верхний индекс в таблице (блестящий)

У меня есть дата в блестящем приложении, в котором я хочу добавить верхний индекс к своим наблюдениям. В них следует подробно указать, является ли наблюдение оценкой, и как далеко год наблюдения от базового года (эти данные уже есть в моем наборе данных). Например, конкретное наблюдение может отображать: "75(верхний индекс)-3 e".

Это возможно?

2 ответа

У меня был тот же вопрос сегодня, и этот пост помог мне разобраться в этом. Вот рабочий пример того, как добавить подписки в имена строк таблицы визуализации (Shiny)? который я вставил ниже, с полным признанием того, что это не мое!

Следующее:

  library(shiny)
  library(DT)
  ui <- fluidPage(dataTableOutput("table"))

  server <- function(input, output) {
     output$table <- renderDataTable({
      data <- datatable(data.frame(c(1, 2), row.names = c("A<sub>1</sub>", "A<sub>2</sub>")), rownames = T, escape = FALSE)
      })
  }

  shinyApp(ui = ui, server = server)

Я пробовал подобное <sub> а также <sup> теги в теле таблицы, и он обрабатывает это так же.

Хорошо, решение состоит в том, чтобы ввести верхний индекс в html-теги и указать "escape = FALSE" в render datatable для рендеринга html.

Другие вопросы по тегам