Estou interessado em renderizar uma tabela de dados DT dentro do carrossel do slickR. Meu caso de uso real terá uma imagem seguida por uma tabela. Aqui está um exemplo rápido do que estou tentando fazer (o código produz um aplicativo shiny vazio):
library(shiny)
library(dplyr)
library(purrr)
library(DT)
library(slickR)
ui <- fluidPage(
slickROutput("iris_slickr")
)
server <- function(input, output) {
output$iris_slickr <- renderSlickR({
iris_split <- iris %>%
split(f = ~Species)
slickR(
map(
names(iris_split)
,~datatable(iris_split[[.x]])
)
)
})
}
shinyApp(ui = ui, server = server)
No exemplo acima, eu gostaria de um slide por espécie de íris. Acredito que o motivo pelo qual isso não funciona é porque o DT tem suas próprias funções de renderização, e não tenho certeza de como incorporar ambas renderSlickR
e renderDT
se isso é possível. Sei que poderia simplesmente usar a paginação do datatable para isso, mas, como mencionado, meu caso de uso também terá uma imagem acima de cada tabela, por exemplo, imagem de espécie de íris.
Da minha leitura dos documentos,
slickR
não é possível renderizar nenhum objeto por si só. Em vez disso, seguindo o código nesta pergunta relacionada, você pode exportar cada objeto de tabela de dados como um arquivo HTML, que pode então ser incluído noslickR
carrossel como umiframe
.