Merge pull request #247 from StuartWheater/v6.1-dev

Added missing functions

Author: StuartWheater

azure-pipelines.yml

@@ -335,7 +335,7 @@ jobs:
                 junit_rep <- JunitReporter$new(file = "test_results_dsdanger.xml");
                 progress_rep <- ProgressReporter$new(max_failures = 999999);
                 multi_rep <- MultiReporter$new(reporters = list(progress_rep, junit_rep));
-                testthat::test_package("$(projectName)", filter = "smk_dgr-|math_dgr-",reporter = multi_rep, stop_on_failure = FALSE)
+                testthat::test_package("$(projectName)", filter = "smk_dgr-",reporter = multi_rep, stop_on_failure = FALSE)
                 '"'"'
             )
         );
@@ -353,8 +353,8 @@ jobs:
         write.csv(
             coverage_to_list(
                 c(dsbase.res, dsdanger.res)
-                "coveragelist.csv"
-            )
+            ),
+            "coveragelist.csv"
         )'
 
       # display the test console output

tests/testthat/test-smk-ds.listClientsideFunctions.R

@@ -56,7 +56,10 @@ test_that("check results", {
         "ds.exists",
         "ds.exp",
         "ds.glm",
+        "ds.glmerSLMA",
+        "ds.glmPredict",
         "ds.glmSLMA",
+        "ds.glmSummary",
         "ds.heatmapPlot",
         "ds.histogram",
         "ds.isNA",
@@ -70,6 +73,7 @@ test_that("check results", {
         "ds.listDisclosureSettings",
         "ds.listOpals",
         "ds.listServersideFunctions",
+        "ds.lmerSLMA",
         "ds.log",
         "ds.look",
         "ds.ls",
@@ -102,6 +106,7 @@ test_that("check results", {
         "ds.rowColCalc",
         "ds.rPois",
         "ds.rUnif",
+        "ds.sample",
         "ds.scatterPlot",
         "ds.seq",
         "ds.setDefaultOpals",

tests/testthat/test-smk-ds.listServersideFunctions.R

@@ -24,24 +24,25 @@ test_that("check results", {
       "BooleDS", "as.character", "as.null", "as.numeric", "asCharacterDS", "asDataMatrixDS",
       "asFactorDS", "asFactorDS2", "asIntegerDS", "asListDS", "asLogicalDS", "asMatrixDS",
       "asMatrixDS", "asNumericDS", "attach", "c", "cDS", "cbind",
-      "cbindDS", "changeRefGroupDS", "completeCasesDS", "complete.cases", "dataFrameDS", "dataFrameSortDS", "dataFrameSubsetDS2",
-      "dataFrameDS", "exp", "lexisDS2", "lexisDS3", "list",
-      "listDS", "log", "matrixDS", "matrixDetDS2", "matrixDiagDS", "matrixDimnamesDS", "matrixInvertDS",
+      "cbindDS", "changeRefGroupDS", "completeCasesDS", "complete.cases", "dataFrameDS", "dataFrameFillDS", "dataFrameSortDS",
+      "dataFrameSubsetDS2", "dataFrameDS", "exp", "glmPredictDS.as", "glmSLMADS.assign", "glmSummaryDS.as",
+      "lexisDS2", "lexisDS3", "list", "listDS", "log",
+      "matrixDS", "matrixDetDS2", "matrixDiagDS", "matrixDimnamesDS", "matrixInvertDS",
       "matrixMultDS", "matrixTransposeDS", "mergeDS", "rBinomDS", "rNormDS", "rPoisDS",
       "rUnifDS", "rbindDS", "reShapeDS", "recodeLevelsDS", "recodeValuesDS2", "repDS", "rep",
-      "replaceNaDS", "rowColCalcDS", "seedDS", "seqDS", "subsetByClassDS", "subsetDS", "sum",
+      "replaceNaDS", "rowColCalcDS", "seedDS", "seqDS", "subsetByClassDS", "subsetDS", "sum", "sampleDS",
       "tableDS.assign", "tapplyDS.assign", "unlist", "unListDS"
     ))
     aggregate.functions <- factor(c(
       "NROW", "asFactorDS1", "asListDS",
-      "checkNegValueDS", "classDS", "colnamesDS", "corTestDS",
+      "checkNegValueDS", "classDS", "colnamesDS", "corDS", "corTestDS",
       "covDS", "dataFrameSubsetDS1",
       "densityGridDS", "dimDS",
       "exists", "glmDS1", "glmDS1", "glmDS2",
-      "glmDS2", "glmSLMADS2", "histogramDS1", "is.character",
-      "is.factor", "is.list", "is.null", "is.numeric",
+      "glmDS2", "glmerSLMADS2", "glmPredictDS.ag", "glmSLMADS1", "glmSLMADS2", "glmSummaryDS.ag",
+      "heatmapPlotDS", "histogramDS1", "histogramDS2", "is.character", "is.factor", "is.list", "is.null", "is.numeric",
       "isNaDS", "isValidDS", "kurtosisDS1", "kurtosisDS2", "lengthDS",
-      "levelsDS", "lexisDS1", "listDisclosureSettingsDS",
+      "levelsDS", "lexisDS1", "listDisclosureSettingsDS", "lmerSLMADS2", "lsDS",
       "matrixDetDS1", "meanDS", "meanSdGpDS", "messageDS",
       "namesDS", "numNaDS", "quantileMeanDS", "rangeDS",
       "recodeValuesDS1", "rmDS", "skewnessDS1", "skewnessDS2", "scatterPlotDS",