Rent or buy: a break-even model

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

步驟 1

rentCost[m_] := rent m
buyCost[m_] := closing + (payment + maintenance) m

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

步驟 2

breakEven = First[Solve[rentCost[m] == buyCost[m], m]]

輸出

{m -> closing/(-maintenance - payment + rent)}

步驟 3

D[m /. breakEven, rent]

輸出

-(closing/(-maintenance - payment + rent)^2)

步驟 4

assumptions = {closing -> 40000, maintenance -> 500, rent -> 2600, payment -> 1900};
monthsToBreakEven = N[m /. breakEven /. assumptions]

輸出

200.

步驟 5

Plot[{rentCost[m] /. assumptions, buyCost[m] /. assumptions}, {m, 0, 300}]

輸出

-Graphics-

Rent or buy: a break-even model

使用到的函式