R/univalboot.R

Defines functions univalboot

Documented in univalboot

univalboot<-function(y,FP,relip){

  k<-size(FP)[2]

  dife<-matrix(0,1,k)

  for (i in 1:k){
    tmp<-cor(FP[,i],y)
    tmp<-tmp/sqrt(relip[i])
    dife[i]<-tmp
    remove(tmp)
  }
  dife=t(dife)

}

Try the unival package in your browser

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

unival documentation built on June 16, 2021, 9:16 a.m.