summaryrefslogtreecommitdiff
path: root/src/statisticsFunctions/variance/dcolumnvariancea.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/statisticsFunctions/variance/dcolumnvariancea.c')
-rw-r--r--src/statisticsFunctions/variance/dcolumnvariancea.c24
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);
}