R/ndiff.R

ndiff <-
function(n, d = 1){

if (d == 1)
    {D <- diff(diag(n))}
else
    {D <- diff(ndiff(n, d - 1))}
D
}

Try the QRegVCM package in your browser

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

QRegVCM documentation built on May 1, 2019, 9:11 p.m.