Speichern von Variablen aus einer Funktion in der globalen Umgebung

Question

Ich versuche, eine Variable aus einer Funktion in der globalen Umgebung zu speichern, aber keine der gefundenen Lösungen SO post oder different SO post funktionierte für mich. Dies ist ein extrem vereinfachtes Beispiel zur Veranschaulichung meines Problems. Ich kann nicht einfach <<- verwenden, um v global zu machen, weil meine eigentliche Funktion mehrere Dutzend Variablen erzeugt.

-Code (main_file.R)

source("function_me.R") 
#environment(doGlobalThing) <-parent.frame(2) #didnt work 
doGlobalThing() 
v #cant get to this var from the global environment 

-Code (function_me.R)

doGlobalThing<-function(){ 
    #eval(v<-'hi',env=parent.frame(2)) #tried this, didnt work 
    v<-'hi' 
} 

Answer 1

könnten Sie assign verwenden:

assign("v","hi",envir = globalenv()) 

Dies erfordert, dass Sie den Namen von die globale Zielvariable als eine Zeichenkette, aber es kann leicht sein, dies sogar mit einem Vektor von Dutzenden solcher Dinge zu tun.

This question diskutiert die Unterschiede zwischen assign und <<-. Der Hauptunterschied besteht darin, dass Sie mit assign die Umgebung angeben können. So können Sie Daten problemlos in einer nicht globalen, aber dauerhaften Umgebung speichern, sodass Sie z. emulieren statische Variablen in R. Während es möglich ist, assign zu verwenden, um die globale Umgebung zu ändern, sollten Sie sich bewusst sein, dass es selten eine gute Sache ist, dies zu tun. Es besteht die Gefahr, versehentlich Daten zu überschreiben, die nicht überschrieben werden sollen. Code, der globale Variablen stark verwendet, kann fast immer in saubereren Code umgestaltet werden, was nicht der Fall ist. Wenn Sie viele heterogene Daten von einer Funktion in die aufrufende Umgebung holen müssen, wäre die sauberste Lösung, die benötigten Daten in einer Liste zurückzugeben.

Die accepted answer beendet seine Diskussion über <<- und assign mit einem guten Zitat:

Das Böse und Falsche Verwendung ist Variablen in der globalen Umgebung zu ändern.