R/ppolyser.R

In SINRELEF.LD: Reliability and Relative Efficiency in Locally-Dependent Measures

Defines functions ppolyser

Documented in ppolyser

ppolyser <- function(r,thx,sigx){
  n <- size(thx)[2]
  sum <- 0

  for (i in 1:n){
    sum <- sum + ordnor(thx[i])
  }
  pr <- (r / sigx) * sum
  return(pr)
}

Try the SINRELEF.LD package in your browser