Fluxo de trabalho 5 passos, executados em ordem numa sessão. Cada passo foi executado no motor e a saída abaixo é o que ele produziu.
presentValue[cash_, r_, years_] := Sum[cash/(1 + r)^t, {t, 1, years}]Sem saída - este passo prepara algo para o próximo.
npv = N[presentValue[1200, 0.05, 10] - 9000]266.08191502177397breakEvenRate = r /. FindRoot[presentValue[1200, r, 10] == 9000, {r, 0.05}]0.05604463645158886N[D[presentValue[1200, r, 10], r] /. r -> 0.05]-44998.608919690494Plot[presentValue[1200, r, 10] - 9000, {r, 0.01, 0.12}]-Graphics-Todas as receitas · Referência de funções · Usar isto de um cliente MCP