2017-01-19 2 views
2

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.

Répondre

1

Compris. J'ai dû ajouter un autre paquet qui rendait l'appel ambigu. En ajoutant ce qui suit dans l'interface utilisateur et le côté serveur, cela a fonctionné.

DT::renderDataTable 

DT::dataTableOutput