powered by
wincor(x,y,tr=.2)
z<-rnorm(20) x<-rnorm(20)+z y<-rnorm(20)+z wincor(x,y)
Run the code above in your browser using DataLab