Re: Common Lisp

Retourner au contenu associé (journal : Un article de "Pour la science" m'ayant amené à coder pour une petite vérification perso...)

[^] # Re: Common Lisp

Posté par Michaël (site web personnel) le 21 juillet 2021 à 09:55. En réponse au journal Un article de "Pour la science" m'ayant amené à coder pour une petite vérification perso.... Évalué à 3.
En faisant un exemple avec une plus grande population (1 million) et un grand nombre de transaction (10000 par acteur, soit 10000 millions ici) on arrive à
```
CL-USER> (let ((*regulatory-advantage* 5/100)
 (*population-size* 1000000))
(fortune-repartition (fortune-simulation (* *population-size* 10000))
 1/2 3/4 90/100 95/100))
((0.95 34643 1.9000037e9) (0.9 23940 1.8000128e9) (0.75 11779 1.5000092e9)
 (0.5 4583 1.0000814e9))
```
ce qui fait que les 34643 personnes les plus riches détiennent à elles seules plus de 95% du patrimoine total!