create_hard_credpart function

Creation of a "credpart" object from a vector of class labels