Nothing
Fitted.arima <-
function (object)
{
if (prod(class(object)[1] != "Arima", class(object)[1] != "Arimax"))
stop("The 'object' must be a \"Arima\" or \"Arimax\"!")
eval(object$call$x) - object$residuals
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.