Figure6.1 <- data.frame(
'A'=rep(c(-1, 1, -1, 1), 3),
'B'=rep(c(-1,-1, 1, 1), 3),
'Yield'=c(
28, 36, 18, 31,
25, 32, 19, 30,
27, 32, 23, 29
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.