diff options
author | torset | 2009-01-27 09:29:11 +0000 |
---|---|---|
committer | torset | 2009-01-27 09:29:11 +0000 |
commit | 652761d30174c933e2ab5784868b121ca26d8106 (patch) | |
tree | 5d1c142e485026e9a152389cb2b1b7e0a3ff4bf2 /src/statisticsFunctions/variance/dcolumnvariancea.c | |
parent | 8f6b3360f5188b92f573e7aedc8b15146d2a72bc (diff) | |
download | scilab2c-652761d30174c933e2ab5784868b121ca26d8106.tar.gz scilab2c-652761d30174c933e2ab5784868b121ca26d8106.tar.bz2 scilab2c-652761d30174c933e2ab5784868b121ca26d8106.zip |
Debug variance
Diffstat (limited to 'src/statisticsFunctions/variance/dcolumnvariancea.c')
-rw-r--r-- | src/statisticsFunctions/variance/dcolumnvariancea.c | 24 |
1 files changed, 23 insertions, 1 deletions
diff --git a/src/statisticsFunctions/variance/dcolumnvariancea.c b/src/statisticsFunctions/variance/dcolumnvariancea.c index 104e9860..42c12560 100644 --- a/src/statisticsFunctions/variance/dcolumnvariancea.c +++ b/src/statisticsFunctions/variance/dcolumnvariancea.c @@ -15,9 +15,31 @@ void dcolumnvariancea(double *in, int lines, int columns, double* out){ int i = 0 ; + int j = 0 ; + + double* transp = (double*) malloc ( sizeof (double) *(unsigned int) (lines*columns)); + + + for ( i = 0; i < 5 ; i++){ + for ( j = 0; j < 4 ; j++) + printf("%f ",in[i+j*lines]); + printf("\n"); + } + + + dtransposea ( in , lines , columns , transp ) ; + + + for ( i = 0; i < 4 ; i++){ + for ( j = 0; j < 5 ; j++) + printf("%f ",transp[i+j*columns]); + printf("\n"); + } for ( i = 0; i < lines ; i++) - out[i] = dvariancea ( in + i*columns , columns ) ; + out[i] = dvariancea ( transp + i*columns , columns ) ; + + free (transp); } |