What if interest rates rise: a mortgage payment's sensitivity

工作流程共 5 個步驟，在同一個工作階段中依序執行。每一步都在引擎上實際執行過，下方的輸出就是它產生的結果。

步驟 1

payment[principal_, rate_, months_] := principal (rate/12)/(1 - (1 + rate/12)^(-months))

沒有輸出——這個步驟是在為下一步做準備。

步驟 2

current = N[payment[400000, 0.065, 360]]

輸出

2528.272093971862

步驟 3

N[payment[400000, 0.08, 360]] - current

輸出

406.7862015456485

步驟 4

perPercentagePoint = N[D[payment[400000, r, 360], r] /. r -> 0.065]/100

輸出

263.0602719400421

步驟 5

Plot[payment[400000, r, 360], {r, 0.03, 0.10}]

輸出

-Graphics-

使用到的函式