R/cna.R

Defines functions `cna`

`cna` <-
function(cij, ...) {
  if(inherits(cij, "matrix")) {
    class(cij) <- c("matrix", "dccm")
    UseMethod("cna", cij)
  } else {
   class(cij) <- c("ensmb")
   UseMethod("cna", cij)
  }
}

Try the bio3d package in your browser

Any scripts or data that you put into this service are public.

bio3d documentation built on Oct. 27, 2022, 1:06 a.m.