R/getGenerations.R

In flowFit: Estimate proliferation in cell-tracking dye studies

## =========================================================================##
## =========================================================================##
##                          getGenerations                                  ##
## =========================================================================##
## =========================================================================##
getGenerations <- function(object)
{
  .generations <- as.list(object@generations)
  names(.generations) <- paste("generation_", c(1:object@numberOfPeaks), sep="")
  return(.generations)
}