From 18abae7245041cda6189d88b75f0bd45178d8f9b Mon Sep 17 00:00:00 2001
From: Mark Baker <mark@lange.demon.co.uk>
Date: Sun, 31 Jan 2021 16:42:17 +0100
Subject: [PATCH] Additional statistical unit tests (#1818)

---
 .../Statistical/NegBinomDistTest.php          | 31 ++++++++++++++++
 .../Functions/Statistical/PoissonTest.php     | 31 ++++++++++++++++
 tests/data/Calculation/MathTrig/FLOOR.php     |  5 +++
 tests/data/Calculation/MathTrig/FLOORMATH.php |  5 +++
 .../Calculation/MathTrig/FLOORPRECISE.php     |  5 +++
 .../Calculation/Statistical/NEGBINOMDIST.php  | 36 +++++++++++++++++++
 tests/data/Calculation/Statistical/PERMUT.php |  8 +++++
 .../data/Calculation/Statistical/POISSON.php  | 28 +++++++++++++++
 8 files changed, 149 insertions(+)
 create mode 100644 tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/NegBinomDistTest.php
 create mode 100644 tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/PoissonTest.php
 create mode 100644 tests/data/Calculation/Statistical/NEGBINOMDIST.php
 create mode 100644 tests/data/Calculation/Statistical/POISSON.php

diff --git a/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/NegBinomDistTest.php b/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/NegBinomDistTest.php
new file mode 100644
index 0000000000..9c082da775
--- /dev/null
+++ b/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/NegBinomDistTest.php
@@ -0,0 +1,31 @@
+<?php
+
+namespace PhpOffice\PhpSpreadsheetTests\Calculation\Functions\Statistical;
+
+use PhpOffice\PhpSpreadsheet\Calculation\Functions;
+use PhpOffice\PhpSpreadsheet\Calculation\Statistical;
+use PHPUnit\Framework\TestCase;
+
+class NegBinomDistTest extends TestCase
+{
+    protected function setUp(): void
+    {
+        Functions::setCompatibilityMode(Functions::COMPATIBILITY_EXCEL);
+    }
+
+    /**
+     * @dataProvider providerNEGBINOMDIST
+     *
+     * @param mixed $expectedResult
+     */
+    public function testNEGBINOMDIST($expectedResult, ...$args): void
+    {
+        $result = Statistical::NEGBINOMDIST(...$args);
+        self::assertEqualsWithDelta($expectedResult, $result, 1E-12);
+    }
+
+    public function providerNEGBINOMDIST()
+    {
+        return require 'tests/data/Calculation/Statistical/NEGBINOMDIST.php';
+    }
+}
diff --git a/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/PoissonTest.php b/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/PoissonTest.php
new file mode 100644
index 0000000000..e511d0febf
--- /dev/null
+++ b/tests/PhpSpreadsheetTests/Calculation/Functions/Statistical/PoissonTest.php
@@ -0,0 +1,31 @@
+<?php
+
+namespace PhpOffice\PhpSpreadsheetTests\Calculation\Functions\Statistical;
+
+use PhpOffice\PhpSpreadsheet\Calculation\Functions;
+use PhpOffice\PhpSpreadsheet\Calculation\Statistical;
+use PHPUnit\Framework\TestCase;
+
+class PoissonTest extends TestCase
+{
+    protected function setUp(): void
+    {
+        Functions::setCompatibilityMode(Functions::COMPATIBILITY_EXCEL);
+    }
+
+    /**
+     * @dataProvider providerPOISSON
+     *
+     * @param mixed $expectedResult
+     */
+    public function testPOISSON($expectedResult, ...$args): void
+    {
+        $result = Statistical::POISSON(...$args);
+        self::assertEqualsWithDelta($expectedResult, $result, 1E-12);
+    }
+
+    public function providerPOISSON()
+    {
+        return require 'tests/data/Calculation/Statistical/POISSON.php';
+    }
+}
diff --git a/tests/data/Calculation/MathTrig/FLOOR.php b/tests/data/Calculation/MathTrig/FLOOR.php
index 7d408173db..5810bc77ed 100644
--- a/tests/data/Calculation/MathTrig/FLOOR.php
+++ b/tests/data/Calculation/MathTrig/FLOOR.php
@@ -16,6 +16,11 @@
         -2.5,
         2,
     ],
+    [
+        0.0,
+        0.0,
+        1,
+    ],
     [
         '#NUM!',
         2.5,
diff --git a/tests/data/Calculation/MathTrig/FLOORMATH.php b/tests/data/Calculation/MathTrig/FLOORMATH.php
index 8bf64eb392..bd2220fa83 100644
--- a/tests/data/Calculation/MathTrig/FLOORMATH.php
+++ b/tests/data/Calculation/MathTrig/FLOORMATH.php
@@ -21,6 +21,11 @@
         2.5,
         -2,
     ],
+    [
+        0.0,
+        0.0,
+        1,
+    ],
     [
         '#DIV/0!',
         123.456,
diff --git a/tests/data/Calculation/MathTrig/FLOORPRECISE.php b/tests/data/Calculation/MathTrig/FLOORPRECISE.php
index 4cefd98484..575f295231 100644
--- a/tests/data/Calculation/MathTrig/FLOORPRECISE.php
+++ b/tests/data/Calculation/MathTrig/FLOORPRECISE.php
@@ -21,6 +21,11 @@
         2.5,
         -2,
     ],
+    [
+        0.0,
+        0.0,
+        1,
+    ],
     [
         '#DIV/0!',
         123.456,
diff --git a/tests/data/Calculation/Statistical/NEGBINOMDIST.php b/tests/data/Calculation/Statistical/NEGBINOMDIST.php
new file mode 100644
index 0000000000..1783d87ad5
--- /dev/null
+++ b/tests/data/Calculation/Statistical/NEGBINOMDIST.php
@@ -0,0 +1,36 @@
+<?php
+
+return [
+    [
+        0.05504866037517786,
+        10, 5, 0.25,
+    ],
+    [
+        0.047210693359375,
+        6, 12, 0.5,
+    ],
+    [
+        0.0805901288986206,
+        12, 12, 0.5,
+    ],
+    [
+        0.057564377784729004,
+        15, 12, 0.5,
+    ],
+    [
+        '#VALUE!',
+        15, 12, 'NaN',
+    ],
+    [
+        '#NUM!',
+        15, 12, -0.25,
+    ],
+    [
+        '#NUM!',
+        -1, 1, 0.25,
+    ],
+    [
+        '#NUM!',
+        1, 0.5, 0.25,
+    ],
+];
diff --git a/tests/data/Calculation/Statistical/PERMUT.php b/tests/data/Calculation/Statistical/PERMUT.php
index 7e4a70138b..47be16caca 100644
--- a/tests/data/Calculation/Statistical/PERMUT.php
+++ b/tests/data/Calculation/Statistical/PERMUT.php
@@ -45,4 +45,12 @@
         10068347520,
         49, 6,
     ],
+    [
+        '#NUM!',
+        1, 2,
+    ],
+    [
+        '#VALUE!',
+        49, 'NaN',
+    ],
 ];
diff --git a/tests/data/Calculation/Statistical/POISSON.php b/tests/data/Calculation/Statistical/POISSON.php
new file mode 100644
index 0000000000..11a82cab6b
--- /dev/null
+++ b/tests/data/Calculation/Statistical/POISSON.php
@@ -0,0 +1,28 @@
+<?php
+
+return [
+    [
+        0.12465201948308113,
+        2, 5, true,
+    ],
+    [
+        0.08422433748856833,
+        2, 5, false,
+    ],
+    [
+        0.05191746860849132,
+        20, 25, false,
+    ],
+    [
+        0.24241419769010333,
+        35, 40, true,
+    ],
+    [
+        '#NUM!',
+        35, -40, true,
+    ],
+    [
+        '#VALUE!',
+        35, 'Nan', true,
+    ],
+];