e1 <- list(
x = rnorm(5),
y = letters[c(1:2, 2:1, 3)],
z = c(TRUE, TRUE, FALSE, TRUE, TRUE)
)
e2 <- list(
x = rnorm(5),
y = letters[c(1:4, 1)],
z = c(FALSE, TRUE, FALSE, TRUE, FALSE)
)
X <- list(e1, e2)
lget(X, name = "x")
sget(X, name = "y")
Run the code above in your browser using DataLab