Визуализировать суб / верхний индекс в таблице (блестящий)
У меня есть дата в блестящем приложении, в котором я хочу добавить верхний индекс к своим наблюдениям. В них следует подробно указать, является ли наблюдение оценкой, и как далеко год наблюдения от базового года (эти данные уже есть в моем наборе данных). Например, конкретное наблюдение может отображать: "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.