Files
PhpSpreadsheet/samples/Calculations/Engineering/ERF.php
T
oleibman 641f86dc80 Eliminate Some "Mixed" Variables in Samples
A continuation of PR #3859. Change code that would be flagged if we were to run Phpstan at level 9 (we currently run level 8). I may or may not follow up with source code (454 level-9 problems remain for src), but there is no reason to avoid the effort for samples.

No changes are made to src.
2024-01-20 16:39:23 -08:00

71 lines
1.9 KiB
PHP

<?php
use PhpOffice\PhpSpreadsheet\Spreadsheet;
require __DIR__ . '/../../Header.php';
$category = 'Engineering';
$functionName = 'ERF';
$description = 'Returns the error function integrated between lower_limit and upper_limit';
$helper->titles($category, $functionName, $description);
// Create new PhpSpreadsheet object
$spreadsheet = new Spreadsheet();
$worksheet = $spreadsheet->getActiveSheet();
// Add some data
$testData1 = [
[0.745],
[1],
[1.5],
[-2],
];
$testData2 = [
[0, 1.5],
[1, 2],
[-2, 1],
];
$testDataCount1 = count($testData1);
$testDataCount2 = count($testData2);
$testData2StartRow = $testDataCount1 + 1;
$worksheet->fromArray($testData1, null, 'A1', true);
$worksheet->fromArray($testData2, null, "A{$testData2StartRow}", true);
for ($row = 1; $row <= $testDataCount1; ++$row) {
$worksheet->setCellValue('C' . $row, '=ERF(A' . $row . ')');
}
for ($row = $testDataCount1 + 1; $row <= $testDataCount2 + $testDataCount1; ++$row) {
$worksheet->setCellValue('C' . $row, '=ERF(A' . $row . ', B' . $row . ')');
}
// Test the formulae
$helper->log('ERF() With a single argument');
for ($row = 1; $row <= $testDataCount1; ++$row) {
$helper->log(
"(C$row): "
. $worksheet->getCell('C' . $row)->getValue()
. ' The error function integrated between 0 and '
. $worksheet->getCell('A' . $row)->getValue()
. ' is '
. $worksheet->getCell('C' . $row)->getCalculatedValue()
);
}
$helper->log('ERF() With two arguments');
for ($row = $testDataCount1 + 1; $row <= $testDataCount2 + $testDataCount1; ++$row) {
$helper->log(
"(C$row): "
. $worksheet->getCell('C' . $row)->getValue()
. ' The error function integrated between '
. $worksheet->getCell('A' . $row)->getValue()
. ' and '
. $worksheet->getCell('B' . $row)->getValue()
. ' is '
. $worksheet->getCell('C' . $row)->getCalculatedValue()
);
}