Nothing
#' S3 coef method for stops objects
#'
#'@param object object of class stops
#'@param ... addditional arguments
#'@export
#'@importFrom stats coef
#'@return a vector of hyperparmeters theta
coef.stops <- function(object,...)
{
return(c(object$parameters))
}
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.