## Using it the classical way:
result <- sensmixed(c("Coloursaturation", "Colourbalance"),
                    Prod_effects=c("TVset", "Picture"),
                    replication="Repeat", individual="Assessor", data=TVbo, 
                    calc_post_hoc = FALSE, error_structure ="2-WAY", keep.effs="Assessor")

result

result <- sensmixed(c("Coloursaturation", "Colourbalance"),
                    Prod_effects=c("TVset", "Picture"),
                    replication="Repeat", individual="Assessor", data=TVbo, 
                    calc_post_hoc = TRUE, error_structure ="3-WAY", 
                    keep.effs=c("Assessor","TVset:Picture:Assessor") , MAM=TRUE, oneway_rand = FALSE)

result

plot(result)

install.packages("devtools")
## To run the Shiny version:
require(devtools)
install_github("SensMixed", username = "alku86", ref = "master")

require("SensMixed")
SensMixedUI()