Trả về các phần tử của danh sách dưới dạng các đối tượng độc lập trong môi trường toàn cầu

Question

Tôi có một danh sách và muốn chia các phần tử của danh sách thành các đối tượng riêng biệt trong môi trường toàn cầu.

Ví dụ, tôi muốn danh sách:

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

được ba đối tượng riêng biệt a, b và c.

Tôi cố gắng để đạt được điều này với:

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

Nhưng nó thất bại, với Error in names(x)[1] <<- x[1] : object 'x' not found.

Làm cách nào để đạt được mục tiêu của mình?

Answer 1

Có chức năng đặc biệt cho danh sách lập bản đồ môi trường:

> 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 Nhận xét của tôi được cung cấp dưới dạng câu trả lời

Answer 2

tôi không khuyên bạn nên nó nhưng bạn có thể sử dụng 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

Điều này cũng sẽ làm việc:

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