###################################################
### code chunk number 4: Z.model
###################################################
Z.model <- matrix(0, 11, 3)
Z.model[c(1, 2, 9, 10), 1] <- 1 # which elements in col 1 are 1
Z.model[c(3:6, 11), 2] <- 1 # which elements in col 2 are 1
Z.model[7:8, 3] <- 1 # which elements in col 3 are 1
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.