Nothing
#' Predict ngssm.mle.p object.
#'
#' @param x ngssm.mle.p object
#' @param ... ignored
#'@noRd
summary.ngssm.bayes<- function(object,...){
objecta <-object$summary
class(objecta) = "ngssm.bayes"
return(objecta)
}
#predict.ngssm.mle(fit,data=NULL)
#predict(fit,data=NULL)
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.