R/npcor.R

# nonparametric partial correlation
np.partial.cor <- function (y, z, x) {
  return(cor(y - predict(loess.wrapper(x, y)), z - predict(loess.wrapper(x, z))))
}
zhejosephliu/blossomTree documentation built on May 4, 2019, 10:17 p.m.