library(tidyverse) library(tsibble) library(lubridate) library(fable) library(verification) data(tourism) #简化州名 tourism <- tourism %>% mutate( State = recode(State, "Australian Capital Territory" = "ACT", "New South Wales" = "NSW", "Northern Territory" = "NT", "Queensland" = "QLD", "South Australia" = "SA", "Tasm...