Rückgabeelemente der Liste als unabhängige Objekte in globaler Umgebung

Question

Ich habe eine Liste und möchte die Elemente der Liste in separate Objekte in der globalen Umgebung aufteilen.

Zum Beispiel würde ich die Liste mag:

obj <- list(a=1:5, b=2:10, c=-5:5) 

werden drei separate Objekte a, b und c.

Ich habe versucht, dies zu erreichen mit:

lapply(obj, FUN = function(x) names(x)[1] <<- x[1]) 

Aber es scheiterte, mit Error in names(x)[1] <<- x[1] : object 'x' not found.

Wie kann ich mein Ziel erreichen?

Answer 1

Es besondere Funktion Umgebung für Mapping-Liste ist:

> obj <- list(a=1:5, b=2:10, c=-5:5) 
> ls() 
[1] "obj" 
> list2env(obj,globalenv()) 
<environment: R_GlobalEnv> 
> ls() 
[1] "a" "b" "c" "obj" 

PS Es ist mein Kommentar als Antwort

zur Verfügung gestellt

Answer 2

Ich empfehle es nicht, aber Sie attach

> obj <- list(a=1:5, b=2:10, c=-5:5) 
> attach(obj) 
> a 
[1] 1 2 3 4 5 
> b 
[1] 2 3 4 5 6 7 8 9 10 
> c 
[1] -5 -4 -3 -2 -1 0 1 2 3 4 5 

Answer 3

Dies auch funktionieren würde verwenden:

lapply(seq_along(obj), function(i) assign(names(obj)[i], obj[[i]], envir = .GlobalEnv))