Nyholm\EffectiveInterest\Calculator

Complexity

Total Complexity

7

Size/Duplication

Total Lines	97
Duplicated Lines	6.19 %

Coupling/Cohesion

Components	1
Dependencies	1

Test Coverage

Coverage

100%

Importance

Changes

0

4 Methods

Rating	Name	Duplication	Size	Complexity
A	__construct()	0	4	1
B	withSpecifiedPayments()	0	24	3
A	withEqualPayments()	6	12	1
A	preparePayments()	0	13	2

<?php

namespace Nyholm\EffectiveInterest;

/**
 * @author Tobias Nyholm <tobias.nyholm@gmail.com>
 */
class Calculator
{
    /**
     * @var NewtonRaphson
     */
    private $newton;

    /**
     * @param NewtonRaphson $newton
     */
    public function __construct(NewtonRaphson $newton = null)
    {
        $this->newton = $newton ?? new NewtonRaphson();
    }

    /**
     * Get the interest when you know all the payments and their dates. Use this function when you have
     * administration fees at the first payment and/or when payments are irregular.
     *
     * @param int    $principal
     * @param string $startDate in format 'YYYY-mm-dd'
     * @param array  $payments  array with payment dates and values ['YYYY-mm-dd'=>int]
     * @param float  $guess     A guess what the interest may be. Between zero and one. Example 0.045
     *
     * @return float
     */
    public function withSpecifiedPayments(int $principal, string $startDate, array $payments, float $guess): float
    {
        list($values, $days) = $this->preparePayments($principal, $startDate, $payments);

        $fx = function ($x) use ($days, $values) {
            $sum = 0;
            foreach ($days as $idx => $day) {
                $sum += $values[$idx] * pow(1 + $x, ($days[0] - $day) / 365);
            }

            return $sum;
        };

        $fdx = function ($x) use ($days, $values) {
            $sum = 0;
            foreach ($days as $idx => $date) {
                $sum += (1 / 365) * ($days[0] - $date) * $values[$idx] * pow(1 + $x, (($days[0] - $date) / 365) - 1);
            }

            return $sum;
        };

        return $this->newton->run($fx, $fdx, $guess);
    }

    /**
     * Get the effective interest when the monthly payments are exactly the same.
     *
     * @param int   $a The total loan amount (Principal)
     * @param int   $p The monthly payment
     * @param int   $n The number of months
     * @param float $i A guess of what the interest might be. Interest as a number between zero and one. Example 0.045
     *
     * @return float
     */
    public function withEqualPayments(int $a, int $p, int $n, float $i): float
    {
        $fx = function ($i) use ($a, $p, $n) {

This code seems to be duplicated across your project.

            return  $p - $p * pow(1 + $i, -1 * $n) - $i * $a;
        };

        $fdx = function ($i) use ($a, $p, $n) {

This code seems to be duplicated across your project.

            return  $n * $p * pow(1 + $i, -1 * $n - 1) - $a;
        };

        return 12 * $this->newton->run($fx, $fdx, $i);
    }

    /**
     * Prepare payment data by separating dates from values and prefix the array with the principal.
     *
     * @param int    $principal
     * @param string $startDate
     * @param array  $payments
     *
     * @return array
     */
    private function preparePayments(int $principal, string $startDate, array $payments): array
    {
        $values = [-1 * $principal];
        $dates = [1];
        $startDate = new \DateTimeImmutable($startDate);

        foreach ($payments as $date => $payment) {
            $values[] = $payment;
            $dates[] = 1 + $startDate->diff(new \DateTime($date))->days;
        }

        return [$values, $dates];
    }
}