Nothing
nObs.probit <- function(x, ...) {
return( x$param$nObs )
}
nobs.probit <- function( object, ... ) {
return( nObs.probit( object, ... ) )
}
nObs.selection <- function(x, ...) {
return( x$param$nObs )
}
nobs.selection <- function( object, ... ) {
return( nObs.selection( object, ... ) )
}
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.