as.supervised function

Conversion of an unsupervised model into a supervised one