From 3f4fae8ecfe095101fee1d2f4deccfb9decdf93e Mon Sep 17 00:00:00 2001 From: torset Date: Fri, 6 Feb 2009 15:34:24 +0000 Subject: Update zvariancea --- src/statisticsFunctions/variance/zvariancea.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/statisticsFunctions/variance/zvariancea.c b/src/statisticsFunctions/variance/zvariancea.c index a1b65278..1db49fd5 100644 --- a/src/statisticsFunctions/variance/zvariancea.c +++ b/src/statisticsFunctions/variance/zvariancea.c @@ -20,11 +20,12 @@ doubleComplex zvariancea(doubleComplex *in, int size) doubleComplex temp = DoubleComplex ( 0 , 0 ) ; doubleComplex variance = DoubleComplex ( 0 , 0 ); doubleComplex mean = zmeana ( in , size ) ; - + for ( i = 0 ; i < size ; i++) { temp = zdiffs( in[i] , mean ) ; - sum = zadds ( sum , zpows ( temp , DoubleComplex ( 2, 0) ) ); + sum = zadds ( sum , zpows ( temp , DoubleComplex ( 2, 0) ) ); + printf("sum[%d] : %f+%f*i\n",i,zreals(sum), zimags(sum)); } variance = zrdivs (sum , DoubleComplex ( (size - 1),0 )); -- cgit