rprimarycensored function

Generate random samples from a primary event censored distribution