R/pvse.R

"pvse" <-
function (x)
 {
 ve <- vare(x)
 vr <- varr(x)
 pv <- ve/vr*100
 mat <- matrix(pv)
 colnames(mat) <- "Compare to > 75%"
 return(mat)
 }

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.