Nothing
models_in <- function() return(list(ind=c("VAR","SVAR","SMVAR", "GVAR","SVECM","SVARHL",
"SVARHLX","SVARHLMA", "DFM","GGVAR"),
indne=c("SMVAR", "GVAR"),
pop = c("MLVAR","GGVAR"),
popne= c("MLVAR"),
sparse=c("SVAR","SMVAR", "GVAR","SVECM","SVARHL",
"SVARHLX","SVARHLMA","GGVAR"),
contemporaneous = c("GVAR","GGVAR","DFM")))
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.