From c56cc4986d4af88d8de83df24dec8e61e375d97f Mon Sep 17 00:00:00 2001
From: Christoph Ruegg <git@cdrnet.ch>
Date: Sat, 12 Apr 2014 18:54:58 +0200
Subject: [PATCH] Statistics: simpler PopulationSkewness and PopulationKurtosis
 implementation

---
 src/Numerics/Statistics/RunningStatistics.cs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Numerics/Statistics/RunningStatistics.cs b/src/Numerics/Statistics/RunningStatistics.cs
index 6af0bf9b..1458e52b 100644
--- a/src/Numerics/Statistics/RunningStatistics.cs
+++ b/src/Numerics/Statistics/RunningStatistics.cs
@@ -151,7 +151,7 @@ namespace MathNet.Numerics.Statistics
         /// </summary>
         public double PopulationSkewness
         {
-            get { return _n < 2 ? double.NaN : _m3*Math.Sqrt(_n*(_n - 1))*Math.Sqrt(_m2/(_n - 1))/(_m2*_m2); }
+            get { return _n < 2 ? double.NaN : Math.Sqrt(_n)*_m3/Math.Pow(_m2, 1.5); }
         }
 
         /// <summary>
@@ -171,7 +171,7 @@ namespace MathNet.Numerics.Statistics
         /// </summary>
         public double PopulationKurtosis
         {
-            get { return _n < 3 ? double.NaN : (_m4*_n - 3*_m2*_m2)/(_m2*_m2); }
+            get { return _n < 3 ? double.NaN : _n*_m4/(_m2*_m2) - 3.0; }
         }
 
         /// <summary>