addCompRisk function

Generating single competing risk survival variable