R/opVar.R

opVar <- function(O) {
   vv <- apply(O, 1, function(x) sum(x^2))
   vv
}
hafen/operator documentation built on May 17, 2019, 2:23 p.m.