data("mod.intro")
## get the length of the pattern order table:
patternOrderLength(mod.intro)
## set the length of the pattern order table to 1:
patternOrderLength(mod.intro) <- 1
## note that the pattern order table remained intact:
patternOrder(mod.intro, full = TRUE)
Run the code above in your browser using DataLab