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

Coefficients:
         ar1      ma1     sar1    sma1
      0.9756  -0.7746  -0.8873  0.6400
s.e.  0.0027   0.0062   0.0129  0.0244

sigma^2 estimated as 562604209:  log likelihood = -107625.5,  aic = 215261