Check the recipe code
Examples
examine_recipe(takeout())
#> → No name was supplied so selecting a random named experimental design...
#> → Selected Youden Square Design
#> design("Youden Square Design") %>%
#> set_units(row = 8,
#> col = 4,
#> unit = crossed_by(row, col)) %>%
#> set_trts(trt = 8) %>%
#> allot_trts(trt ~ unit) %>%
#> assign_trts("random", seed = 309) %>%
#> serve_table()