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

Coefficients:
         ar1      ma1     sar1     sma1
      0.9431  -0.6490  -0.0985  -0.6938
s.e.  0.0081   0.0185   0.0389   0.0378

sigma^2 estimated as 7.75e+08:  log likelihood = -35924.86,  aic = 71859.72