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", assessor="Participant", 
                      product_structure=3, data=originalBOdadta, 
                      parallel = FALSE, error_structure = "3-WAY")

Try the SensMixed package in your browser

Any scripts or data that you put into this service are public.

SensMixed documentation built on May 1, 2019, 9:16 p.m.