init

ue01/twosums/src/sum2.c

@@ -0,0 +1,13 @@
+#include <R.h>
+
+void sum2(double* mtrx, int* m, int* n, double* res)
+{
+    *res = 0;
+
+    for(int i=0; i < *n; i++)
+    {
+        for(int j=0; j < *m; j++) {
+            *res += mtrx[j * (*n) + i];
+        }
+    }
+}