R code for Cormack-Jolly-Seber Model for individual recapture histories with data generator