寓言：模型功能列表

Question

有了寓言，我可以做到：

require(fable)   
it <-  tsibbledata::global_economy %>%    filter(Country == "Italy")
fm <-  model(.data = it, ARIMA(log(GDP) ~ Population), ETS(log(GDP)))

我希望能够在将模型列表传递给model（）之前对其进行构建，例如：

mod_list <- list2(m1 = ARIMA(log(GDP) ~ Population), m2 = ETS(log(GDP)))
fm <- model(.data = it, mod_list)        

我找不到实现此目标的方法。 有什么建议吗？

类似的东西：

map(mod_list, model, .data = it)

可能是一个起点，但不完全是我想要实现的目标

在此先感谢您的帮助