如何将列表的元素转储到全局环境中（或者等效于函数的环境）？

Question

我有一份我已保存的清单。我想加载列表，然后将其所有元素传输到全局环境。或者，等效地，如果对象在函数内部加载，则为函数的环境。

这是一个简单的例子。如何自动化最后几行？

L <- list(goats = 'goats', cheese = 'cheese'
, numbarz = 1:5, nice.model = lm(rnorm(100)~rexp(100)))
save(L, 'L.Rda')
rm(L)
load('L.Rda')
goats <- L$goats
cheese <- L$cheese
numbarz <- L$numbarz
nice.model <- L$nice.model