Call:
arima(x = NewsAndPolitics_DennisKucinich, order = c(1, 0, 1), seasonal = list(order = c(1, 
    1, 1), period = 24))

Coefficients:
         ar1      ma1     sar1     sma1
      0.9559  -0.7151  -0.4117  -0.4215
s.e.  0.0064   0.0136   0.0327   0.0403

sigma^2 estimated as 54058726:  log likelihood = -31820.13,  aic = 63650.27