R/ngenes.default.R

Defines functions `ngenes.default`

`ngenes.default` <-
function(pn, i=NULL) {
  if (is.null(pn)) return(NULL)
  if (is.null(i))
    return(sapply(pn, ngenes.i))
  else
    return(ngenes.i(pn[,i]))
}
alexsanchezpla/goProfiles documentation built on May 28, 2019, 4:54 p.m.