How can I change the order of the legends: .model
appears first then level
?
library(fpp3)
us_change %>%
model(model1 = ARIMA(Consumption ~ PDQ(0,0,0)),
model2 = ARIMA(Consumption ~ PDQ(1,0,0)),
model3 = ARIMA(Consumption ~ PDQ(2,0,0))) %>%
forecast(h = 36) %>%
autoplot(us_change) +
theme(legend.position ='top')
Created on 2020-11-29 by the reprex package (v0.3.0)