gen.Kinf function

generates a K-inflated distribution from discrete gamlss family