R/cov.pop.R

In vlulla/vlutils: Common utilities that I find useful

Defines functions cov.pop

Documented in cov.pop

cov.pop <-
function(x,y=NULL,...) { cov(x,y, ...) * (NROW(x)-1)/NROW(x) }