Merci pour votre aide. Encore un petite question, vous auriez des liens en français plutôt svp ?
 
Et autre chose, j'ai écrit un programme en VBA mais ça me donne une espérance énorme; pourriez-vous me donner votre avis ?
 
Voilà :
Sub Prime_pure()
Dim n As Double
Dim i As Double
Dim E As Double
 
n = 10
i = 2
E = 0
 
For i = 2 To n
    Cells(i, 2) = WorksheetFunction.NegBinomDist(Cells(i, 1), 25.8, 0.11)
    E = E + (Cells(i, 1) / Cells(i, 2))
Next i
 
E = E / n
Cells(7, 7) = E
 
End Sub