Table15.1 <- data.frame(
'A'=rep(c(-1, 1), 4),
'B'=rep(c(-1,-1,1,1), 2),
'C'=c(rep(-1, 4), rep(1, 4)),
'Coupons'=c(200,250,265,347,210,286,271,326)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.