Use gg_season() instead of ggseason().

Explanation:

As can be observed from the book question, it says autoplot(), gg_season(), gg_subseries(), gg_lag(),ACF() |> autoplot().

Whereas your question shows the use of ggseason() which can handle ts objects easily but aus_retail is not a ts object , it is tsibble which requires gg_season()