Kann nicht verstehen, was folgender Code in R tut

Question

Während ich die Abfrage von NLP, habe ich diesen Code. Kann jemand beschreiben, was es tut:

candidates <- reactive({ 
    if (is.null(ng)) { return(NULL) } 
    pred.time <- system.time({ 
     candidates <- predictN(input$inputtext, ng(), ngramRange = 1:4)    
    }) 
    values$pred.time <- HTML(sprintf("%3.2f s", pred.time[3])) 
    candidates 
    }) 

Answer 1

es eine Funktion reactive (live Aktualisierung) erstellt, die entweder NULL zurück, wenn ng NULL ist, oder sonst mal, wie es dauert lange eine Vorhersage auf einige Benutzer eingegebenen Text basiert laufen Wert unter Verwendung ng.

ng ist offenbar ein statistisches Modell auf der Grundlage von N-Gramm Text Mining mit 1 Gramm bis 4 Gramm.

Es gibt auch die Zeit aus, die es als HTML formatierten Text aufzeichnet.