From f8f2582d2e29173cf8a0f0657f1a407ae75f8f12 Mon Sep 17 00:00:00 2001 From: Dennis Eichhorn Date: Wed, 28 Sep 2016 08:15:44 +0200 Subject: [PATCH] Fixing loranz kurve --- Math/Finance/Lorenzkurve.php | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/Math/Finance/Lorenzkurve.php b/Math/Finance/Lorenzkurve.php index ea7ca8d16..08d071548 100644 --- a/Math/Finance/Lorenzkurve.php +++ b/Math/Finance/Lorenzkurve.php @@ -35,9 +35,12 @@ class Lorenzkurve $i = 1; $n = count($data); + sort($data); + foreach ($data as $key => $value) { - $sum1 += $i * $value; - $sum2 += $value; + $sum1 += $i * $value; + $sum2 += $value; + $i++; } return 2 * $sum1 / ($n * $sum2) - ($n + 1) / $n;