R/COR_AUX.R

Defines functions cor.aux.func

########################################################################
# COR AUX FUNCTIONS
########################################################################
cor.aux.func <- function(x, y, svydes){
  withReplicates(svydes, function(w,data)
    cov.wt(cbind(x, y), 
           wt=w, cor =TRUE)$cor[1,2])}
manuelreif/svyPVpack documentation built on May 21, 2019, 11:26 a.m.