summaryrefslogtreecommitdiff
path: root/src/statisticsFunctions/variance/dvariancea.c
diff options
context:
space:
mode:
authortorset2009-01-27 09:29:11 +0000
committertorset2009-01-27 09:29:11 +0000
commit652761d30174c933e2ab5784868b121ca26d8106 (patch)
tree5d1c142e485026e9a152389cb2b1b7e0a3ff4bf2 /src/statisticsFunctions/variance/dvariancea.c
parent8f6b3360f5188b92f573e7aedc8b15146d2a72bc (diff)
downloadscilab2c-652761d30174c933e2ab5784868b121ca26d8106.tar.gz
scilab2c-652761d30174c933e2ab5784868b121ca26d8106.tar.bz2
scilab2c-652761d30174c933e2ab5784868b121ca26d8106.zip
Debug variance
Diffstat (limited to 'src/statisticsFunctions/variance/dvariancea.c')
-rw-r--r--src/statisticsFunctions/variance/dvariancea.c10
1 files changed, 3 insertions, 7 deletions
diff --git a/src/statisticsFunctions/variance/dvariancea.c b/src/statisticsFunctions/variance/dvariancea.c
index 39bd6abf..98ebf014 100644
--- a/src/statisticsFunctions/variance/dvariancea.c
+++ b/src/statisticsFunctions/variance/dvariancea.c
@@ -17,22 +17,18 @@ double dvariancea(double *in, int size)
int i = 0 ;
double temp = 0 ;
- double sumc = 0 ;
double variance = 0;
double mean = dmeana ( in , size );
for ( i = 0 ; i < size ; i++)
{
-
temp += dpows ( (in[i] - mean ) ,2 ) ;
- sumc += (in[i] - mean);
}
- if ( fabs ( sumc) > 1e-16)
- variance = ( temp - dpows( sumc,2))/ ( size-1);
- else
- variance = ( temp )/ ( size -1);
+
+ variance = ( temp )/ ( size -1);
+
return variance ;
}