tests/bugBO.R

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")
alku86/SensMixed documentation built on May 10, 2019, 9:21 a.m.