Code
des1 <- design(name = "nested units", seed = 1) %>% set_units(block = 3, plot = nested_in(
block, 2))
des1
Output
An edibble design
\-block (3 levels)
\-plot (6 levels)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.