R/abscor.R

`abscor` <-
function(X)
{
    LX <- log(X)
    cor(abs(seriesMerge(der(LX,5),der(LX,-5),der(LX,-15),der(LX,-60))))
}

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.