Nothing
stdEr.intReg <- function( x, boundaries=FALSE, ... ) {
## stdEr method. By default, ignore the fixed boundaries.
stde <- NextMethod("stdEr", x, ...)
if(!boundaries) {
i <- rep(TRUE, nParam(x))
i[x$param$index$boundary] <- FALSE
stde <- stde[i]
}
class( stde ) <- c( "stdEr.intReg", class(stde) )
return( stde )
}
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.