寓言：将模型列表传递给模型

Question

有了寓言，我就能做到

    library(fable)

    it <-  tsibbledata::global_economy %>%
      filter(Country == "Italy")

    fm1 <-  model(.data = it, 
                  ARIMA(log(GDP)),
                  ETS(log(GDP)))

它有效

假设您将模型存储在列表中：

mdl_list <- list(ARIMA(log(GDP)),
                 ETS(log(GDP)))

为了将mdl_list的所有模型应用于.data = it，我发现的最佳解决方案是：

mdl_list <-  c (list(.data =  it), mdl_list)
do.call(model, mdl_list)

但是，我想要类似的东西：

models(.data, mdl_list)

很明显我可以写models()我自己，但我想知道models()之类的东西是否已经或将要成为现实， 寓言中

谢谢