http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/java/org/apache/sysml/test/integration/functions/append/NaryCBindTest.java
----------------------------------------------------------------------
diff --git 
a/src/test/java/org/apache/sysml/test/integration/functions/append/NaryCBindTest.java
 
b/src/test/java/org/apache/sysml/test/integration/functions/append/NaryCBindTest.java
new file mode 100644
index 0000000..13ba799
--- /dev/null
+++ 
b/src/test/java/org/apache/sysml/test/integration/functions/append/NaryCBindTest.java
@@ -0,0 +1,192 @@
+/*
+ * Licensed to the Apache Software Foundation (ASF) under one
+ * or more contributor license agreements.  See the NOTICE file
+ * distributed with this work for additional information
+ * regarding copyright ownership.  The ASF licenses this file
+ * to you under the Apache License, Version 2.0 (the
+ * "License"); you may not use this file except in compliance
+ * with the License.  You may obtain a copy of the License at
+ * 
+ *   http://www.apache.org/licenses/LICENSE-2.0
+ * 
+ * Unless required by applicable law or agreed to in writing,
+ * software distributed under the License is distributed on an
+ * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+ * KIND, either express or implied.  See the License for the
+ * specific language governing permissions and limitations
+ * under the License.
+ */
+
+package org.apache.sysml.test.integration.functions.append;
+
+import java.util.HashMap;
+
+import org.junit.Assert;
+import org.junit.Test;
+
+import org.apache.sysml.api.DMLScript;
+import org.apache.sysml.api.DMLScript.RUNTIME_PLATFORM;
+import org.apache.sysml.lops.LopProperties.ExecType;
+import org.apache.sysml.runtime.matrix.data.MatrixValue.CellIndex;
+import org.apache.sysml.test.integration.AutomatedTestBase;
+import org.apache.sysml.test.integration.TestConfiguration;
+import org.apache.sysml.test.utils.TestUtils;
+
+public class NaryCBindTest extends AutomatedTestBase
+{      
+       private final static String TEST_NAME = "NaryCbind";
+       private final static String TEST_DIR = "functions/append/";
+       private final static String TEST_CLASS_DIR = TEST_DIR + 
NaryCBindTest.class.getSimpleName() + "/";
+
+       private final static double epsilon=0.0000000001;
+       
+       private final static int rows = 1101;
+       private final static int cols1 = 101;
+       private final static int cols2 = 79;
+       private final static int cols3 = 123;
+       
+       private final static double sparsity1 = 0.7;
+       private final static double sparsity2 = 0.07;
+       
+       @Override
+       public void setUp() {
+               TestUtils.clearAssertionInformation();
+               addTestConfiguration(TEST_NAME, new 
TestConfiguration(TEST_CLASS_DIR, TEST_NAME, new String[] {"R"}));
+       }
+
+       @Test
+       public void testNaryCbindDenseDenseDenseCP() {
+               runCbindTest(false, false, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindDenseDenseSparseCP() {
+               runCbindTest(false, false, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindDenseSparseDenseCP() {
+               runCbindTest(false, true, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindDenseSparseSparseCP() {
+               runCbindTest(false, true, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindSparseDenseDenseCP() {
+               runCbindTest(true, false, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindSparseDenseSparseCP() {
+               runCbindTest(true, false, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindSparseSparseDenseCP() {
+               runCbindTest(true, true, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindSparseSparseSparseCP() {
+               runCbindTest(true, true, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryCbindDenseDenseDenseSP() {
+               runCbindTest(false, false, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindDenseDenseSparseSP() {
+               runCbindTest(false, false, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindDenseSparseDenseSP() {
+               runCbindTest(false, true, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindDenseSparseSparseSP() {
+               runCbindTest(false, true, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindSparseDenseDenseSP() {
+               runCbindTest(true, false, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindSparseDenseSparseSP() {
+               runCbindTest(true, false, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindSparseSparseDenseSP() {
+               runCbindTest(true, true, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryCbindSparseSparseSparseSP() {
+               runCbindTest(true, true, true, ExecType.CP);
+       }
+       
+       
+       public void runCbindTest(boolean sparse1, boolean sparse2, boolean 
sparse3, ExecType et)
+       {
+               RUNTIME_PLATFORM platformOld = rtplatform;
+               switch( et ) {
+                       case MR: rtplatform = RUNTIME_PLATFORM.HADOOP; break;
+                       case SPARK: rtplatform = RUNTIME_PLATFORM.SPARK; break;
+                       default: rtplatform = RUNTIME_PLATFORM.HYBRID_SPARK; 
break;
+               }
+               
+               boolean sparkConfigOld = DMLScript.USE_LOCAL_SPARK_CONFIG;
+               if( rtplatform == RUNTIME_PLATFORM.SPARK || rtplatform == 
RUNTIME_PLATFORM.HYBRID_SPARK )
+                       DMLScript.USE_LOCAL_SPARK_CONFIG = true;
+               
+               try
+               {
+                       TestConfiguration config = 
getAndLoadTestConfiguration(TEST_NAME);
+                       loadTestConfiguration(config);
+                       
+                       String RI_HOME = SCRIPT_DIR + TEST_DIR;
+                       fullDMLScriptName = RI_HOME + TEST_NAME + ".dml";
+                       programArgs = new String[]{"-stats", "-args", 
input("A"),
+                               input("B"), input("C"), output("R") };
+                       fullRScriptName = RI_HOME + TEST_NAME + ".R";
+                       rCmd = "Rscript" + " " + fullRScriptName + " " +
+                               inputDir() + " "+ expectedDir();
+                       
+                       //generate input data
+                       double sp1 = sparse1 ? sparsity2 : sparsity1; 
+                       double sp2 = sparse2 ? sparsity2 : sparsity1; 
+                       double sp3 = sparse3 ? sparsity2 : sparsity1; 
+                       double[][] A = getRandomMatrix(rows, cols1, -1, 1, sp1, 
711);
+                       double[][] B = getRandomMatrix(rows, cols2, -1, 1, sp2, 
722);
+                       double[][] C = getRandomMatrix(rows, cols3, -1, 1, sp3, 
733);
+                       writeInputMatrixWithMTD("A", A, true);
+                       writeInputMatrixWithMTD("B", B, true);
+                       writeInputMatrixWithMTD("C", C, true);
+                       
+                       //run tests
+                       runTest(true, false, null, -1);
+                       runRScript(true);
+                       
+                       //compare result data
+                       HashMap<CellIndex, Double> dmlfile = 
readDMLMatrixFromHDFS("R");
+                       HashMap<CellIndex, Double> rfile = 
readRMatrixFromFS("R");
+                       TestUtils.compareMatrices(dmlfile, rfile, epsilon, 
"DML", "R");
+                       
+                       //check for spark instructions
+                       
Assert.assertTrue(heavyHittersContainsSubString("sp_cbind")==(et==ExecType.SPARK));
+               }
+               finally {
+                       rtplatform = platformOld;
+                       DMLScript.USE_LOCAL_SPARK_CONFIG = sparkConfigOld;
+               }
+       }
+}

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/java/org/apache/sysml/test/integration/functions/append/NaryRBindTest.java
----------------------------------------------------------------------
diff --git 
a/src/test/java/org/apache/sysml/test/integration/functions/append/NaryRBindTest.java
 
b/src/test/java/org/apache/sysml/test/integration/functions/append/NaryRBindTest.java
new file mode 100644
index 0000000..f820bf5
--- /dev/null
+++ 
b/src/test/java/org/apache/sysml/test/integration/functions/append/NaryRBindTest.java
@@ -0,0 +1,192 @@
+/*
+ * Licensed to the Apache Software Foundation (ASF) under one
+ * or more contributor license agreements.  See the NOTICE file
+ * distributed with this work for additional information
+ * regarding copyright ownership.  The ASF licenses this file
+ * to you under the Apache License, Version 2.0 (the
+ * "License"); you may not use this file except in compliance
+ * with the License.  You may obtain a copy of the License at
+ * 
+ *   http://www.apache.org/licenses/LICENSE-2.0
+ * 
+ * Unless required by applicable law or agreed to in writing,
+ * software distributed under the License is distributed on an
+ * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+ * KIND, either express or implied.  See the License for the
+ * specific language governing permissions and limitations
+ * under the License.
+ */
+
+package org.apache.sysml.test.integration.functions.append;
+
+import java.util.HashMap;
+
+import org.junit.Assert;
+import org.junit.Test;
+
+import org.apache.sysml.api.DMLScript;
+import org.apache.sysml.api.DMLScript.RUNTIME_PLATFORM;
+import org.apache.sysml.lops.LopProperties.ExecType;
+import org.apache.sysml.runtime.matrix.data.MatrixValue.CellIndex;
+import org.apache.sysml.test.integration.AutomatedTestBase;
+import org.apache.sysml.test.integration.TestConfiguration;
+import org.apache.sysml.test.utils.TestUtils;
+
+public class NaryRBindTest extends AutomatedTestBase
+{      
+       private final static String TEST_NAME = "NaryRbind";
+       private final static String TEST_DIR = "functions/append/";
+       private final static String TEST_CLASS_DIR = TEST_DIR + 
NaryRBindTest.class.getSimpleName() + "/";
+
+       private final static double epsilon=0.0000000001;
+       
+       private final static int cols = 101;
+       private final static int rows1 = 1101;
+       private final static int rows2 = 1179;
+       private final static int rows3 = 1123;
+       
+       private final static double sparsity1 = 0.7;
+       private final static double sparsity2 = 0.07;
+       
+       @Override
+       public void setUp() {
+               TestUtils.clearAssertionInformation();
+               addTestConfiguration(TEST_NAME, new 
TestConfiguration(TEST_CLASS_DIR, TEST_NAME, new String[] {"R"}));
+       }
+
+       @Test
+       public void testNaryRbindDenseDenseDenseCP() {
+               runRbindTest(false, false, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindDenseDenseSparseCP() {
+               runRbindTest(false, false, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindDenseSparseDenseCP() {
+               runRbindTest(false, true, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindDenseSparseSparseCP() {
+               runRbindTest(false, true, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindSparseDenseDenseCP() {
+               runRbindTest(true, false, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindSparseDenseSparseCP() {
+               runRbindTest(true, false, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindSparseSparseDenseCP() {
+               runRbindTest(true, true, false, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindSparseSparseSparseCP() {
+               runRbindTest(true, true, true, ExecType.CP);
+       }
+       
+       @Test
+       public void testNaryRbindDenseDenseDenseSP() {
+               runRbindTest(false, false, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindDenseDenseSparseSP() {
+               runRbindTest(false, false, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindDenseSparseDenseSP() {
+               runRbindTest(false, true, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindDenseSparseSparseSP() {
+               runRbindTest(false, true, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindSparseDenseDenseSP() {
+               runRbindTest(true, false, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindSparseDenseSparseSP() {
+               runRbindTest(true, false, true, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindSparseSparseDenseSP() {
+               runRbindTest(true, true, false, ExecType.SPARK);
+       }
+       
+       @Test
+       public void testNaryRbindSparseSparseSparseSP() {
+               runRbindTest(true, true, true, ExecType.CP);
+       }
+       
+       
+       public void runRbindTest(boolean sparse1, boolean sparse2, boolean 
sparse3, ExecType et)
+       {
+               RUNTIME_PLATFORM platformOld = rtplatform;
+               switch( et ) {
+                       case MR: rtplatform = RUNTIME_PLATFORM.HADOOP; break;
+                       case SPARK: rtplatform = RUNTIME_PLATFORM.SPARK; break;
+                       default: rtplatform = RUNTIME_PLATFORM.HYBRID_SPARK; 
break;
+               }
+               
+               boolean sparkConfigOld = DMLScript.USE_LOCAL_SPARK_CONFIG;
+               if( rtplatform == RUNTIME_PLATFORM.SPARK || rtplatform == 
RUNTIME_PLATFORM.HYBRID_SPARK )
+                       DMLScript.USE_LOCAL_SPARK_CONFIG = true;
+               
+               try
+               {
+                       TestConfiguration config = 
getAndLoadTestConfiguration(TEST_NAME);
+                       loadTestConfiguration(config);
+                       
+                       String RI_HOME = SCRIPT_DIR + TEST_DIR;
+                       fullDMLScriptName = RI_HOME + TEST_NAME + ".dml";
+                       programArgs = new String[]{"-stats", "-args", 
input("A"), 
+                               input("B"), input("C"), output("R") };
+                       fullRScriptName = RI_HOME + TEST_NAME + ".R";
+                       rCmd = "Rscript" + " " + fullRScriptName + " " + 
+                               inputDir() + " "+ expectedDir();
+                       
+                       //generate input data
+                       double sp1 = sparse1 ? sparsity2 : sparsity1; 
+                       double sp2 = sparse2 ? sparsity2 : sparsity1; 
+                       double sp3 = sparse3 ? sparsity2 : sparsity1; 
+                       double[][] A = getRandomMatrix(rows1, cols, -1, 1, sp1, 
711);
+                       double[][] B = getRandomMatrix(rows2, cols, -1, 1, sp2, 
722);
+                       double[][] C = getRandomMatrix(rows3, cols, -1, 1, sp3, 
733);
+                       writeInputMatrixWithMTD("A", A, true);
+                       writeInputMatrixWithMTD("B", B, true);
+                       writeInputMatrixWithMTD("C", C, true);
+                       
+                       //run tests
+                       runTest(true, false, null, -1);
+                       runRScript(true);
+                       
+                       //compare result data
+                       HashMap<CellIndex, Double> dmlfile = 
readDMLMatrixFromHDFS("R");
+                       HashMap<CellIndex, Double> rfile = 
readRMatrixFromFS("R");
+                       TestUtils.compareMatrices(dmlfile, rfile, epsilon, 
"DML", "R");
+                       
+                       //check for spark instructions
+                       
Assert.assertTrue(heavyHittersContainsSubString("sp_rbind")==(et==ExecType.SPARK));
+               }
+               finally {
+                       rtplatform = platformOld;
+                       DMLScript.USE_LOCAL_SPARK_CONFIG = sparkConfigOld;
+               }
+       }
+}

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/scripts/functions/append/NaryCbind.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/append/NaryCbind.R 
b/src/test/scripts/functions/append/NaryCbind.R
new file mode 100644
index 0000000..4cc8d89
--- /dev/null
+++ b/src/test/scripts/functions/append/NaryCbind.R
@@ -0,0 +1,32 @@
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+library("Matrix")
+
+A = as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B = as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+C = as.matrix(readMM(paste(args[1], "C.mtx", sep="")))
+
+R = cbind(cbind(A, B), C);
+
+writeMM(as(R,"CsparseMatrix"), paste(args[2], "R", sep=""))

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/scripts/functions/append/NaryCbind.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/append/NaryCbind.dml 
b/src/test/scripts/functions/append/NaryCbind.dml
new file mode 100644
index 0000000..18331ad
--- /dev/null
+++ b/src/test/scripts/functions/append/NaryCbind.dml
@@ -0,0 +1,26 @@
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+A = read($1)
+B = read($2)
+C = read($3)
+R = cbind(A, B, C);
+write(R, $4)

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/scripts/functions/append/NaryRbind.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/append/NaryRbind.R 
b/src/test/scripts/functions/append/NaryRbind.R
new file mode 100644
index 0000000..30ed40b
--- /dev/null
+++ b/src/test/scripts/functions/append/NaryRbind.R
@@ -0,0 +1,32 @@
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+library("Matrix")
+
+A = as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B = as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+C = as.matrix(readMM(paste(args[1], "C.mtx", sep="")))
+
+R = rbind(rbind(A, B), C);
+
+writeMM(as(R,"CsparseMatrix"), paste(args[2], "R", sep=""))

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test/scripts/functions/append/NaryRbind.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/append/NaryRbind.dml 
b/src/test/scripts/functions/append/NaryRbind.dml
new file mode 100644
index 0000000..515c4ce
--- /dev/null
+++ b/src/test/scripts/functions/append/NaryRbind.dml
@@ -0,0 +1,26 @@
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+A = read($1)
+B = read($2)
+C = read($3)
+R = rbind(A, B, C);
+write(R, $4)

http://git-wip-us.apache.org/repos/asf/systemml/blob/c0b6ef5c/src/test_suites/java/org/apache/sysml/test/integration/functions/append/ZPackageSuite.java
----------------------------------------------------------------------
diff --git 
a/src/test_suites/java/org/apache/sysml/test/integration/functions/append/ZPackageSuite.java
 
b/src/test_suites/java/org/apache/sysml/test/integration/functions/append/ZPackageSuite.java
index 5f0842b..df7cdd1 100644
--- 
a/src/test_suites/java/org/apache/sysml/test/integration/functions/append/ZPackageSuite.java
+++ 
b/src/test_suites/java/org/apache/sysml/test/integration/functions/append/ZPackageSuite.java
@@ -29,6 +29,8 @@ import org.junit.runners.Suite;
        AppendChainTest.class,
        AppendMatrixTest.class,
        AppendVectorTest.class,
+       NaryCBindTest.class,
+       NaryRBindTest.class,
        RBindCBindMatrixTest.class,
        StringAppendTest.class,
 })

Reply via email to