Назначение нескольких объектов.GlobalEnv из функции.

Пост здесь день назад заставил меня задуматься, как присвоить значения нескольким объектам в глобальной среде из функции. Это моя попытка использоватьlapply(assignможет быть безопаснее, чем <<-, но я никогда не использовал его и не знаком с ним ).

#fake data set
df <- data.frame(
  x.2=rnorm(25),
  y.2=rnorm(25),
  g=rep(factor(LETTERS[1:5]), 5)
)

#split it into a list of data frames
LIST <- split(df, df$g)

#pre-allot 5 objects in R with class data.frame()
V <- W <- X <- Y <- Z <- data.frame()

#attempt to assign the data frames in the LIST to the objects just created
lapply(seq_along(LIST), function(x) c(V, W, X, Y, Z)[x] <<- LIST[[x]])

Пожалуйста, не стесняйтесь сокращать любые/все части моего кода, чтобы это работало (или работало лучше/быстрее ).