将来キャッシュフローの現在価値(2)
素晴らしいです!この章もほぼ完了し、データフレームとファイナンスの達人に近づいています。先に進む前に、もう少しだけ確認しておきましょう。
今はpresent_valueという列がありますが、その合計額を取締役会に報告したいとします。ここは簡単です。先ほど学んだsum()関数を使って、cash$present_valueの要素を合計しましょう。
さらに、総現在価値に対して、企業Aと企業Bがそれぞれどれだけ貢献しているかも知りたいですね。データフレームの行を分けて、企業AまたはBだけを含める方法を覚えていますか?
cash_A <- subset(cash, company == "A")
sum(cash_A$present_value)
[1] 4860.218
この演習はコースの一部です
金融のためのR入門
演習の手順
sum()関数を使って、cashのpresent_value合計を計算し、total_pvに代入します。- 企業Bに関する行だけを含むように
cashを抽出して、cash_Bを作成します。 sum()とcash_Bを使って、企業Bのpresent_value合計を計算し、total_pv_Bに代入します。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Total present value of cash
total_pv <-
# Company B information
cash_B <-
# Total present value of cash_B
total_pv_B <-