SeriesAggreg.OutputsModel.R

SeriesAggreg.OutputsModel <- function(x, ...) {
  res <- suppressMessages(
    SeriesAggreg.list(x,
                      ConvertFun = getAggregConvertFun(names(x)),
                      except = "StateEnd",
                      ...)
  )
  return(res)
}