R/nrow_methods_method.R

#' @name nrow
#' 
#' @title Method override for nrow function
#' 
#' @exportMethod nrow

setMethod(f = 'nrow', 
          signature = 'methods', 
          function(x) {
            nrow(x@counts)
          })

setMethod(f = 'nrow', 
          signature = 'IBRAP', 
          function(x) {
            nrow(x@methods[[1]]@counts)
          })
connorhknight/IBRAP documentation built on March 9, 2023, 7:01 p.m.