1. 学ぶ
    2. /
  2. コース
    3. /
  3. 金融のための中級R
Connected

演習

複数の引数 (2)

もう少し複雑な例を考えてみましょう。Introduction to R for Finance コースで学んだ「現在価値」を覚えていますか？もし忘れていても、こちらの動画で復習できます：here。考え方としては、将来受け取るお金を、一定の利率で割り引いて、今日の価値に換算するというものです。次の一般式は、そのために用いられます。

present_value <- cash_flow * (1 + i / 100) ^ -year

この計算をしてくれる関数があったら便利ですよね。例えば次の形です。

present_value <- pv(cash_flow, i, year)

この関数は、pv(1500, 5, 2) のように数値を渡しても動作しますし、同じ長さのベクトルを渡して、現在価値のベクトル全体を一度に計算できるようにしましょう！

percent_to_decimal() 関数は利用可能ですので、自由に使ってください。

指示

100 XP
  • 関数の空欄を埋めて、次を行うようにしてください。
    • 必須の引数：cash_flow、i、year
    • 割引の乗数を作成します：(1 + i / 100)。i を小数に変換するために percent_to_decimal() 関数を使います。
    • 現在価値の計算を実行します。変数に保存しないでください。最後に評価された行が自動的に返されます。
  • いまから3年後に受け取る $1200 を、利率 7% で割り引いた現在価値を計算してください。