Я пытаюсь воспроизвести ответ, предоставленный на { ссылка }, для отображения сложных заголовков в таблице данных с использованием DT в R shiny. При воспроизведении примера таблица отформатирована правильно, но мои данные не отображаются. Если я удалю «container = sketch», данные отобразятся. Что я делаю не так с вызовом «контейнера»? Спасибо.
sketch = htmltools::withTags(table(
class = 'display',
thead(
tr(
th(rowspan = 2, 'ID'),
th(colspan = 2, 'Web Site'),
th(colspan = 4, 'Number of Edges'),
th(rowspan = 8, 'Position')
),
tr(
th('URL'), th("Root URL"), th('Name'),
th('In'), th('Out'), th('Total')
)
)
))
#dat is saved as a tibble
output$nodeList <- renderDT(dat %>% select(
id, url, rooturl, name, in_degree, out_degree, total_degree, betweeness), container = sketch)