R/man.R

setGeneric("man", function(x, ...) standardGeneric("man"))

setMethod("man", signature=signature("matrix"),
    function(x, diag = FALSE, upper = FALSE)
{
  dist(x, method="manhattan", diag=diag, upper=upper)
} )

setMethod("man", signature=signature("eSet"),
    function(x, diag=FALSE, upper=FALSE) man(exprs(x), diag, upper)
)
Bioconductor/bioDist documentation built on May 4, 2024, 4:48 p.m.