J'essaie de créer une datatable en brillant. Cette solution a travaillé auparavant, mais je dois avoir changé quelque chose pour qu'il ne plus:Datable ne pas rendu en brillant
output$ltl_tbl <- renderDataTable({
input$refresh
ltl_view <- car()
colnames(ltl_view) <- c('Carrier', 'Volume', 'CWT', 'On Time')
DT::datatable(ltl_view,
options = list(lengthMenu = c(10, 25, 50),
pageLength = 10,
orderClasses = TRUE,
fillContainer = TRUE,
searching = FALSE),
rownames = FALSE
) %>%
formatCurrency(3, '$') %>% formatPercentage(4, 0) %>% formatCurrency(2, '', digits= 0)
})
Je suis simplement appeler un dataframe d'une fonction réactive, en changeant les noms de colonnes, puis en créant le DataTable avec quelques options mais cette ne fonctionne pas et je ne peux pas comprendre pourquoi. Lorsque je supprime le format de colonne (formatCurrency & formatPercentage) et supprime également les lignes au-dessus de la datable réelle (par exemple, changement de noms de colonne et affectation de données), il rendra la datatable dans mon shinyapp.