R/squarecor.R

`squarecor` <-
function(X)
{
    LX <- log(X)
    TST <-  seriesMerge(der(LX,5),der(LX,-5),der(LX,-15),der(LX,-60))
    cor(TST*TST)
}

Try the Rsafd package in your browser

Any scripts or data that you put into this service are public.

Rsafd documentation built on May 2, 2019, 5:20 p.m.