search

emitanaka / edibble

An R-package that encapsulate elements of experimental design for better planning, management, and workflow
https://edibble.emitanaka.org
Other
215 stars 14 forks source link

Speed up `assign_trts()` #45

Closed emitanaka closed 1 year ago

emitanaka commented 2 years ago

The design below takes about 13 minutes to run:

design("Mario's plant pathologist problem") %>% 
  set_units(rep = 3,
            col = 12, 
            row = 12, 
            # so 3 x 12 x 12 pots in total?
            pot = crossed_by(rep, col, row),
            # 4 varieties fit per pot so 4 units per pot?
            unit = nested_in(pot, 4)) %>% 
  set_trts(barley = 576) %>% 
  allot_table(barley ~ unit)
emitanaka commented 2 years ago

Note: this took 1 hour for the specs shown below so it's unacceptably long for those with older computers. unnamed