Rent or buy: a break-even model

Quy trình 5 bước, chạy theo thứ tự trong một phiên. Từng bước đều được thực thi trên bộ máy và đầu ra bên dưới là những gì nó tạo ra.

Bước 1

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

Không có đầu ra - bước này chuẩn bị cho bước kế tiếp.

Bước 2

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

Đầu ra

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

Bước 3

D[m /. breakEven, rent]

Đầu ra

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

Bước 4

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

Đầu ra

200.

Bước 5

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

Đầu ra

-Graphics-

Các hàm được dùng

Rent or buy: a break-even model