###################################################
### code chunk number 8: Cs06_print-wolf.B
###################################################
wolf.B <- coef(kem.2, type = "matrix")$B
rownames(wolf.B) <- colnames(wolf.B) <- rownames(royale.dat)
print(wolf.B, digits = 2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.