# returning univariate volatility
# for "R_uni_vola.c"
uni.vola <- function(a,u){
usq <- u^2
# .Call("uni_vola", a, usq, PACKAGE="ccgarch")
.Call("uni_vola", a, usq)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.