require(SensMixed)
load(system.file("testdata","sensBO.RData",package="SensMixed"))
testBO <- FALSE
if(testBO)
result_MAM <- sensmixed(names(originalBOdadta)[8:10],
Prod_effects=c("Track", "Car", "SPL"),
replication="RepetitionFixed", individual="Participant",
product_structure=3, data=originalBOdadta,
parallel = FALSE, error_structure = "3-WAY")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.