HighlanderLab / SIMplyBee

SIMplyBee R package extends AlphaSimR for simulating honeybee populations and breeding programmes
http://www.simplybee.info/
Other
0 stars 5 forks source link

Adding more information to MultiColony show() method #443 #445

Closed gregorgorjanc closed 1 year ago

gregorgorjanc commented 1 year ago

Adding more information to MultiColony show() method #443

gregorgorjanc commented 1 year ago

@janaobsteter this is just a start - I am not entirely happy with the naming. this change gives us this:

> devtools::load_all()
ℹ Loading SIMplyBee
Loading required package: AlphaSimR
Loading required package: R6
> devtools::load_all()
ℹ Loading SIMplyBee
> founderGenomes <- quickHaplo(nInd = 10, nChr = 1, segSites = 100)
> SP <- SimParamBee$new(founderGenomes)
> basePop <- createVirginQueens(founderGenomes)
> 
> drones <- createDrones(x = basePop[1], nInd = 1000)
> droneGroups <- pullDroneGroupsFromDCA(drones, n = 10, nDrones = nFathersPoisson)
> apiary <- createMultiColony(basePop[1:6], n = 6)
> apiary <- cross(apiary, drones = droneGroups[1:6])
> apiary
An object of class "MultiColony" 
Number of colonies:
  proper: 6 
  empty: 0 
  NULL: 0 
  has split: 0 
  has swarmed: 0 
  has superseded: 0 
  has collapsed: 0 
  is productive: 0 

I was following the same idea as the show() for Colony class. I think that would be nice.

I did not want to repeat Number of colonies, but I am not happy with proper either. @janaobsteter @LStrachan any idea how to call a non-empty and a non-NULL colony?