Nothing
predict.GNARfit <- function(object, n.ahead=1, ...){
stopifnot(is.GNARfit(object))
if(!is.null(object$frbic$fact.var)){
stop("fact.var not currently supported with predict")
}
return(simulate.GNARfit(object, nsim=n.ahead, future=TRUE, set.noise=0, ...))
}
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.