ma.model.prior <- function() {
structure(c(-1.98, -1.5, -1.5, -1, -1, -1, -0.5, -0.5, -0.5, -0.5, 0, 0, 0, 0, 0, 1.98, 1.5, 1.5,
1, 1, 1, 0.5, 0.5, 0.5, 0.5, -0.99, -0.98, -0.51, -0.99, -0.5, -0.01, -0.99, -0.5, 0.01, 0.49,
-0.99, -0.5, 0.01, 0.5, 0.99, -0.99, -0.98, -0.51, -0.99, -0.5, -0.01, -0.99, -0.5, 0.01, 0.49,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), .Dim = c(25L, 3L))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.