summaryrefslogtreecommitdiff
path: root/src/statisticsFunctions/mean/zcolumnmeana.c
diff options
context:
space:
mode:
authorjofret2008-06-19 09:41:27 +0000
committerjofret2008-06-19 09:41:27 +0000
commit205395e92234946007cb94809abdaf136d0754f4 (patch)
treed88f50ea40ecdc569efa9b458c848b71eb0cc3bb /src/statisticsFunctions/mean/zcolumnmeana.c
parentf9b0e9e54c8ebf227d2002bd6a621ef3f2ca1272 (diff)
downloadscilab2c-205395e92234946007cb94809abdaf136d0754f4.tar.gz
scilab2c-205395e92234946007cb94809abdaf136d0754f4.tar.bz2
scilab2c-205395e92234946007cb94809abdaf136d0754f4.zip
- Add mean column and row ways.
- Add huge tests.
Diffstat (limited to 'src/statisticsFunctions/mean/zcolumnmeana.c')
-rw-r--r--src/statisticsFunctions/mean/zcolumnmeana.c24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/statisticsFunctions/mean/zcolumnmeana.c b/src/statisticsFunctions/mean/zcolumnmeana.c
new file mode 100644
index 00000000..c4ffef3c
--- /dev/null
+++ b/src/statisticsFunctions/mean/zcolumnmeana.c
@@ -0,0 +1,24 @@
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2008-2008 - INRIA - Bruno JOFRET
+ *
+ * This file must be used under the terms of the CeCILL.
+ * This source file is licensed as described in the file COPYING, which
+ * you should have received as part of this distribution. The terms
+ * are also available at
+ * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ *
+ */
+
+#include "mean.h"
+#include "sum.h"
+
+void zcolumnmeana(doubleComplex *in, int lines, int columns, doubleComplex *out) {
+ int i = 0;
+
+ zcolumnsuma(in, lines, columns, out);
+ for (i = 0; i < lines; ++i)
+ {
+ out[i] = zdevides(out[i] , DoubleComplex((double) columns, 0.0f));
+ }
+}