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

Coefficients:
         ar1      ma1    sar1     sma1
      0.9373  -0.7520  0.0482  -0.8487
s.e.  0.0100   0.0183  0.0219   0.0123

sigma^2 estimated as 230536284:  log likelihood = -34060.92,  aic = 68131.83