function fder=fder(lamda,dur,censor) fder=sum(1-censor)-exp(lamda)*sum(dur);