##data(EMD)
##X=EMD[,1:15]
##Wk=matrix(EMD[,16],nrow=nrow(X))
##CR=FASTcons(X,Wk,maxiter=100)
##These lines produce all the three solutions in less than a minute.
data(sports)
CR=FASTcons(sports,maxiter=10)
Run the code above in your browser using DataLab