Content - fc72cc627117798ec05917cba935ee896da25f57 - 99e7abe/R/vmat.R

visit type:

Tip revision: 33eaaa0f8a23e4860a9a45d24da33520c662e182 authored by Patrick Mair on 02 February 2016, 15:55:12 UTC
version 1.8-10

Tip revision: 33eaaa0

vmat.R

`vmat` <-
function(wgths) {
  v <- as.matrix(wgths)
  r <-rowSums(v)              #row margins of weight matrix
  return(diag(r)-v)
}