Рассчитать график амортизации для обычной 30-летней ипотеки с фиксированной ставкой с фиксированными ежемесячными платежами и принять фиксированную ставку в 12% годовых и первоначальную сумму кредита в размере 100 000 долларов США.

Rate         = 0.12/12;   % 12 percent APR = 1 percent per month
NumPeriods   = 30*12;     % 30 years = 360 months
PresentValue = 100000;

[Principal, Interest, Balance, Payment] = amortize(Rate, ...
NumPeriods, PresentValue);

Выходной аргумент Payment содержит фиксированный ежемесячный платеж.

format bank

Payment

Payment = 
       1028.61

Обобщите график амортизации графически, составив график текущего непогашенного кредитного баланса, кумулятивной основной суммы долга и процентных платежей в течение срока действия ипотеки. В частности, следует отметить, что общая сумма процентов, выплаченных в течение срока действия ипотеки, превышает 270 000 долл. США, что намного превышает первоначальную сумму кредита.

plot(Balance,'b'), hold('on')
plot(cumsum(Principal),'--k')
plot(cumsum(Interest),':r')

xlabel('Payment Month')
ylabel('Dollars')
grid('on')
title('Outstanding Balance, Cumulative Principal & Interest')
legend('Outstanding Balance', 'Cumulative Principal', ... 
'Cumulative Interest')

Сплошная синяя линия представляет собой снижающуюся основную сумму за 30-летний период. Красная пунктирная линия указывает на увеличение совокупных процентных платежей. Наконец, пунктирная черная линия представляет собой совокупную сумму выплат основного долга, достигающую 100 000 долл. США через 30 лет.