Adjusting claim numbers
DataTrain$claim_nb <- DataTrain$claim_nb * (DataTrain$claim_amount > 0)