Content - e3de1215590499c1b0de11353444868a07c45172 - fd252ee/R/normDissN.R

visit type:

Tip revision: d643973f74bee86ab6d37073463aa9f1cb5ddc6d authored by Jan de Leeuw on 30 November 2011, 00:00:00 UTC
version 1.2-1

Tip revision: d643973

normDissN.R

`normDissN` <-
function(diss,wghts,m)
{
  N <- length(diss)*m
  dissnorm <- diss/sqrt(sum(wghts*diss^2))*sqrt(N)
  return(dissnorm)
}