R/length.R

#' @rdname SilacProteomicsExperiment-accessors
#' @aliases length,SilacProteomicsExperiment-method
#' @export
setMethod('length', 'SilacProteomicsExperiment', function(x){

  return(c(protein = length(x@SilacProteinExperiment),
           peptide = length(x@SilacPeptideExperiment)))

})
marcpaga/pulsedSilac documentation built on March 11, 2020, 8:49 p.m.