# NOT RUN {
design = triangle.design(nbprod = 4, nbpanelist = 6, bypanelist = 3)
answer = c("X","Y","Y","X","Z","X","Y","X","Z",
"X","X","Z","X","Y","X","Z","X","Y")
triangle.test (design, answer)
# }
Run the code above in your browser using DataLab