The output is already a tibble, as well as a mable
suppressWarnings(suppressMessages(library(fpp3)))
# Data & Model
tourism %>%
filter(Region %in% c("Melbourne", "Sydney"),
Purpose == "Holiday") %>%
model(ARIMA(Trips)) -> result
class(result)
#> [1] "mdl_df" "tbl_df" "tbl" "data.frame"
Created on 2020-09-26 by the reprex package (v0.3.0.9001)
If the questions is how can it be formatted for display?
suppressWarnings(suppressMessages(library(fpp3)))
# Data & Model
tourism %>%
filter(Region %in% c("Melbourne", "Sydney"),
Purpose == "Holiday") %>%
model(ARIMA(Trips)) -> result
pander::pander(result)
| Region |
State |
Purpose |
ARIMA(Trips) |
| Melbourne |
Victoria |
Holiday |
<ARIMA(0,1,1) w/ drift> |
| Sydney |
New South Wales |
Holiday |
<ARIMA(1,0,0)(1,0,1)[4] w/ mean> |
Created on 2020-09-26 by the reprex package (v0.3.0.9001)