Как показать пробелы в визуализированной таблице данных в блестящем приложении?
При запуске приложения, расположенного ниже, пользователь может дважды щелкнуть, чтобы отредактировать ячейку и увидеть начальный пробел в «значениях» фрейма данных.
Я не знаю, как сделать пробелы видимыми иначе!
library(shiny)
library(DT)
ui = fluidPage(dataTableOutput("mytable"))
server = function(input, output){
values = data.frame(Demographics = c("Total", "Split_A", "Split_B", "Split_B1", "Split_B2"),check.names = F)
output$mytable <- renderDT(
values,
selection = 'none',
rownames = FALSE,
escape = FALSE,
editable = T
)
}
shinyApp(ui, server)