R Shiny DT :: renderDataTable stecken mit einem überlagert „Processing ...“ Banner

Question

Mein DT Datentabelle hat eine Fahne, die sie abdeckt, die „Bearbeitung ...“ sagt, obwohl die Datentabelle verarbeitet worden ist und die Daten erscheinen, hinter das Banner. Das Banner wird nicht VERSCHWINDEN und es macht mich verrückt.

Bestimmte Benutzer meiner App wollen die Spalte spezifische Suchfunktion der veralteten glänzend :: renderDataTable(), damit ich bin mit der glänzenden :: renderDataTable() für data.frames auf einigen Registerkarten und die DT :: renderDataTable() auf anderen Registerkarten.

Ich benutze R-Portable (Windows 7), weil die App für relevante Stakeholder auf dem Boden einsetzbar sein sollte ... also, außer Sie verwenden R-Portable, ich glaube nicht, dass Sie voll und ganz reproduzieren die Umgebung, die ich laufe ... aber das scheint wie ein AJAX-Problem, also kann jemand mit Einsicht eine Antwort geben, ohne den Fehler zu "reproduzieren". Außerdem gibt es in dieser Shiny-App mindestens 1500 Codezeilen, also ziehe ich aus, was ich kann, um die Frage aufzuklären, ohne zu viel Verwirrung zu hinterlassen.

Alles funktioniert einwandfrei in meiner App in Bezug auf Funktionalität ... und ich bin alle folgenden Pakete einschließlich shinyBS (Bootstrap) und shinythemes verwenden, alle wichtigen Funktionen in die global.R Bildeinstellung:

library(shiny) 
library(shinyBS) 
library(shinythemes) 
library(RODBC) 
library(ggplot2) 
library(gridExtra) 
library(Hmisc) 
library(stringr) 
library(data.table) 
library(DT) 

ich meine reaktiven Datentabellenobjekt mit einer Funktion erstellen, die aus unserer SQL-Datenbanken mit RODBC nennt ... ich habe einen Aktionstaste, eine Texteingabe, und die reaktive() Skript ruft die Funktion AttrInfo() bekam die zurück ein Datenrahmen.

TriInfo = reactive({ 
    input$UpdateTBAtt 
    if(input$UpdateTBAtt == 0) return(NULL) 
    isolate(withProgress(message = "Searching for Credit Attribute", 
        value = 0, { 
         AttrInfo(input$TriAttr) 
        })) 
}) 

Mein Code die Datentabelle für die Darstellung der DT Führung folgt:

output$TriLDD <- DT::renderDataTable({ 
    req(input$UpdateTBAtt) 
    DT::datatable(TriInfo(),options = list(paging=FALSE,searching=FALSE)) 
}) 

Meine ui.R Datei dieses Objekt aufruft:

shinyUI(fluidPage(
    list(tags$head(HTML('<link rel="icon", href="RosiePageICON.png", 
        type="image/png" />'))), 
    div(style="padding: 1px 0px; width: '100%'", 
     titlePanel(title="", windowTitle="Rosetta")), 
    navbarPage(theme = shinytheme("spacelab"),title = div(img(src="ReadyRosie_Logo6.png"),""), 
tabPanel("Tri-Bureau Attributes", 
    sidebarLayout(
     sidebarPanel(width = 3, 
      actionButton(inputId = "UpdateTBAtt",label = "Get Attribute"), 
      textInput("TriAttr","Credit Attribute:", value = "")),  
     mainPanel(width=9, 
      tabsetPanel(id = "TB", 
       tabPanel(title = "Check Tables", 
        p("Here's the Definition:"), 
        dataTableOutput(outputId = "TriLDD"))))))))) 

Answer 1

Dies kann auftreten, wenn glänzend denkt, dass Sie shiny::dataTableOutput() anstelle von DT::dataTableOutput() verwenden. Wenn Sie in Ihrem Server explizit DT::renderDataTable() und DT::dataTableOutput() verwenden, vermeiden Sie dieses Problem.

Answer 2

So begraben fand ich endlich die Abhilfe in der jQuery-Bibliothek ... manchmal erfordert es keine reproduzierbaren Code, wenn die Antwort eine einfache Option ist ...

Im Allgemeinen wird etwas in der jQuery-Verarbeitung der DT-Bibliothek, wenn der Befehl shiny :: renderDataTable ebenfalls in derselben App bereitgestellt wird, das Problem verursachen. Wie auch immer, ich fand einen einfachen Workaround.

ich auf die Datentabellen jQuery Seite ging und die „Verarbeitung“ Option gefunden ... Ich habe es nur auf die Optionen:

DT::datatable(TriInfo(),options = list(paging=FALSE, searching=FALSE, processing=FALSE)) 

und verschwand schließlich.