Closed gregorgorjanc closed 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?
Adding more information to MultiColony show() method #443