[GRASS-SVN] r51999 - grass-addons/grass7/raster/r.regression.series

[svn_grass at osgeo.org]

Author: mmetz
Date: 2012-06-07 03:31:28 -0700 (Thu, 07 Jun 2012)
New Revision: 51999

Modified:
   grass-addons/grass7/raster/r.regression.series/main.c
Log:
r.regression.series: fix F (see r51903)

Modified: grass-addons/grass7/raster/r.regression.series/main.c
===================================================================
--- grass-addons/grass7/raster/r.regression.series/main.c	2012-06-07 09:41:22 UTC (rev 51998)
+++ grass-addons/grass7/raster/r.regression.series/main.c	2012-06-07 10:31:28 UTC (rev 51999)
@@ -87,7 +87,7 @@
 	*result = 1 - (1 - R) * ((count - 1) / (count - 2 - 1));
 	break;
     case REGRESSION_F_VALUE:
-	F = R * R / (1 - R * R / count - 2);
+	F = R * R / ((1 - R * R) / (count - 2));
 	*result = F;
 	break;
     case REGRESSION_T_VALUE: