Nothing
# add class rendo.ivre to regular ivreg object to
# catch when the user calls summary() and forward to ivreg's summary () with diagnostic=TRUE
new_rendo_ivreg <- function(F.formula, res.ivreg, call){
class(res.ivreg) <- c("rendo.ivreg",class(res.ivreg))
res.ivreg$call <- call
return(res.ivreg)
}
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.