R/lowerMatVal.R

In Exact: Unconditional Exact Test

Defines functions lowerMatVal

Documented in lowerMatVal

lowerMatVal <-
function(Mat, value=999) {
  Mat[lower.tri(Mat)[, ncol(Mat):1]] <- value
  return(Mat)
}

Try the Exact package in your browser