Nothing
N.lnre <- function (obj, ...)
{
if (! inherits(obj, "lnre")) stop("argument must belong to a subclass of 'lnre'")
spc <- obj$spc
if (is.null(spc)) stop("LNRE model has not been estimated from observed frequency spectrum")
N(spc)
}
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.