R/eigenCAR1.R

Defines functions eigenCAR1

Documented in eigenCAR1

eigenCAR1 <- function(nr,nc)
{

eigenrow <- eigenRW1(nr)
eigencol <- eigenRW1(nc)

list( values = kronecker( rep(1,nc), eigenrow$values) +
        kronecker(eigencol$values, rep(1,nr)) ,
      vectors = kronecker( eigencol$vectors, eigenrow$vectors) )

}

Try the CARrampsOcl package in your browser

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

CARrampsOcl documentation built on May 2, 2019, 3:27 a.m.