20  Split-plot design

📖 Status of the book

Hi there! This book is a work-in-progress. You may like to come back later when it’s closer to a complete state. If you would like to raise issues or leave feedback, please feel to do this:

• at GitHub issues,
• email me at emi.tanaka@anu.edu.au, or
• leave it anonymously in the form here.

spd <- takeout(menu_split(t1 = 2, t2 = 4, r = 10))
examine_recipe(spd)

design("Split-Plot Design | Split-Unit Design") %>%
  set_units(mainplot = 20,
             subplot = nested_in(mainplot, 4)) %>%
  set_trts(trt1 = 2,
           trt2 = 4) %>%
  allot_trts(trt1 ~ mainplot,
             trt2 ~ subplot) %>%
  assign_trts("random", seed = 836) %>%
  serve_table()

autoplot(spd)