R/wCol.R

Defines functions wCol

wCol <-
function(x, w) {
  n <- nrow(x)
  p <- rep(0, n)
  q <- colSums(x * w) / colSums(w)
  delta <- outer(p, q, "+")
  return(list(p = p, q = q, delta = delta))
}

Try the Correlplot package in your browser

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

Correlplot documentation built on March 7, 2023, 8:33 p.m.