Qurak

Is this price fair: present value and the break-even rate

Aliran kerja 5 langkah, dijalankan mengikut urutan dalam satu sesi. Setiap langkah dilaksanakan terhadap enjin dan output di bawah ialah apa yang dihasilkannya.

Langkah 1
presentValue[cash_, r_, years_] := Sum[cash/(1 + r)^t, {t, 1, years}]

Tiada output - langkah ini menyediakan sesuatu untuk langkah seterusnya.

Langkah 2
npv = N[presentValue[1200, 0.05, 10] - 9000]
Output
266.08191502177397
Langkah 3
breakEvenRate = r /. FindRoot[presentValue[1200, r, 10] == 9000, {r, 0.05}]
Output
0.05604463645158886
Langkah 4
N[D[presentValue[1200, r, 10], r] /. r -> 0.05]
Output
-44998.608919690494
Langkah 5
Plot[presentValue[1200, r, 10] - 9000, {r, 0.01, 0.12}]
Output
-Graphics-

Fungsi yang digunakan

Resipi berkaitan

Semua resipi · Rujukan fungsi · Gunakan ini daripada klien MCP