Extract Seasonality Directly from SARIMA in R I want to extract the seasonality from my sarima model.