R/cRRr.R

"cRRr" <-
function (rr, sdy, sdyu)
 {
 rxy <- (rr*(sdyu/sdy))/sqrt(1+rr^2*((sdyu^2/sdy^2)-1))
 return(data.frame(unrestricted = rxy))
 }

Try the psychometric package in your browser

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

psychometric documentation built on Nov. 6, 2023, 1:06 a.m.