Werkzeug zum automatischen Formatieren von R-Code

Question

Gibt es ein Tool (Editor, Skript, was auch immer ...) verfügbar, das automatisch R-Code formatieren kann? Es muss nicht anpassbar sein, aber es muss in der Lage sein, durch Semikolons oder Zeilenumbrüche getrennte Anweisungen zu erkennen, da dieser Code beides hat. Wenn es alle Anweisungen in eine separate Zeile setzen kann, Codeblöcke konsequent einrücken und Klammern konsequent platzieren, werde ich sehr glücklich sein.

Edit: eine Zusammenfassung Ergebnisse

Vielen Dank für die tollen Antworten. Hier ist, was ich gefunden habe.

Sowohl ESS als auch STATET sind großartige R-Editoren und machen einen guten Job zum automatischen Einrücken von Code-Blöcken. Mit STATET können Sie alles in einer Datei gleichzeitig auswählen und neu einrücken. Von dem, was ich sagen konnte, erlaubt es ESS, eine ganze Funktion auf einmal, aber nicht die gesamte Datei einzurücken (bitte korrigiere mich, wenn ich es verpasst habe). Keine dieser Optionen wird die Platzierung von Klammern korrigieren oder Mehrfachzeilenzeilen auflösen. (ZB: i = n * b; a = i + 1)

formatR ist genial. Zusätzlich zum Fixieren der Einrückung werden Klammern auch konsistent platziert und Mehrfach-Anweisungszeilen aufgeteilt.

Hier ist eine kleine Funktion, die ich geschrieben habe, so dass ich ein komplettes Quellverzeichnis (mit der gleichen zugrundeliegenden Funktion wie FormatR, die seltsamerweise im Animationspaket ist) konvertieren kann.

library("animation") 

tidy.all <- function(inDir = NULL, outDir = NULL, ...) { 
    if (is.null(inDir) || is.na(outDir)) 
     stop("inDir can't be null or NA") 
    if (!file.info(inDir)$isdir) 
     stop("inDir must be a directory") 

    if (is.null(outDir) || is.na(outDir)) 
     stop("outDir can't be null or NA") 
    if (!file.exists(outDir)) 
     dir.create(outDir) 
    if (!file.info(outDir)$isdir) 
     stop("outDir must be a directory") 

    for (f in dir(inDir)) { 
     currFile <- file.path(inDir, f) 
     if (length(grep(".*\\.R$", currFile, perl = T))) { 
      outFile <- file.path(outDir, f) 
      if (file.exists(outFile)) 
       stop(paste("refusing to overwrite", outFile)) 

      tidy.source(currFile, file = outFile, ...) 
     } 
    } 
} 

Answer 1

Obwohl ESS eine viel bessere langfristige Lösung ist, wenn Sie nur einen schnellen Formatierungsjob haben, wird diese Packung vielleicht helfen: http://yihui.name/en/?s=formatr.

Answer 2

Obwohl ich es nie benutzt habe, vielleicht die folgende Eclipse-Plug-in http://www.walware.de/it/statet/ könnte in der Lage sein, zu helfen.

Answer 3

Emacs mit ESS macht es außerordentlich gut - und die Standardeinstellung, wie durch R-Core empfohlen sind in Section 7 R coding standards des R Internals Handbuch.

Answer 4

Ich verwende StatET, und es funktioniert ganz gut dafür.

Sie könnten auch the formatR package auf CRAN versuchen.

Answer 5

Sie können Strg + I in statET verwenden, um den Einzug Ihres Codes zu beheben. Es ist jedoch möglich, das formatR-Paket mit Code-Snippets zu verwenden, die ein besseres Ergebnis erzielen, insbesondere durch Zuweisung eines Hotkeys.