Erstellen eines robusten Readline-Skripts in R

Question

Mein R-Skript unten ist praktikabel, aber nicht robust, weil es nur funktioniert, wenn ich es aus der R-Skript-Datei mit der Tastenkombination Strg + Alt + R (RStudio) ausführen, während es nicht Führen Sie den entsprechenden Befehl mit der anderen Tastenkombination Strg + a und dann Strg + Eingabetaste aus.

Wie kann ich das Skript robuster machen, um in irgendeiner Weise zu funktionieren?

enterval <- function() { 
    fNumGlobal <<- (readline("Please choose a file to analyze: ")) 
} 

fNumGlobal = -1 
enterval() 
(fNumGlobal) 

Der letzte Fall gibt eine Zeile wie diese zurück, die Benutzereingabe nicht ausführen kann.

Please choose a file to analyze: (fNumGlobal) 

Answer 1

Putting Klammern um den Code als

{ 
enterval <- function() { 
    fNumGlobal <<- (readline("Please choose a file to analyze: ")) 
} 

fNumGlobal = -1 
enterval() 
(fNumGlobal) 
} 

Bedeutet, dass keines davon wird ausgeführt werden, bis das gesamte Skript in das Konsolenfenster übergeben worden ist, so gibt es keine Möglichkeit für die nächste Zeile des Codes als Eingabe für readline interpretiert werden.