NEW FEATURES AND NEW FUNCTIONS

1 files changed, 25 insertions, 0 deletions

diff --git a/src/c/statisticsFunctions/center/dcentera.c b/src/c/statisticsFunctions/center/dcentera.c
new file mode 100644
index 00000000..87480386
--- /dev/null
+++ b/src/c/statisticsFunctions/center/dcentera.c
@@ -0,0 +1,25 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+#include <ones.h>
+#include "subtraction.h"
+#include "multiplication.h"
+#include "center.h"
+
+void dcentera (double* inp, int row, int col, double* out)
+{
+    double sum = 0, xbar = 0, sigma = 0;
+    for(int i = 0; i < row*col; i++)		// Findinag the maen of all the elements of the matrix
+        sum += inp[i];
+    xbar = sum/(row*col);
+    
+    double one[row*col];			// Creating a matrix of ones
+    donesa(one,row,col);
+
+    double prod[row*col];
+    for(int i = 0; i < row*col; i++)		// Applying the formula (x(i,j)-xbar)/sigma
+        prod[i] = one[i]*xbar;
+
+    for(int i = 0; i < row*col; i++)
+        out[i] = inp[i] - prod[i];
+}