Implementation of Active Function Cross Entropy Clustering as R package