powered by
fast.pattern(x, y, categories = 2, ...)
y
x
X <- matrix(rbinom(100,1,0.5),ncol=4) fast.pattern(X) X <- matrix(rbinom(100,3,0.5),ncol=4) fast.pattern(X,categories=4)
Run the code above in your browser using DataLab