始める無料で始める

別解:キャッシュフロー・ベクトルのコード

上の例では、cf <- c(3, 3, 3, 3, 3, 3, 3, 103) のように書いてキャッシュフローのベクトルを作成したかもしれません。

ただし、これは少し手間に感じられることがあります。代わりに、rep() コマンドを使ってキャッシュフローのベクトルを記述する方法があります。rep(x, y) と入力すると、xy 回自動的に繰り返します。たとえば、rep(1, 4)c(1, 1, 1, 1) と同じです。

この演習では、入力の組み合わせに基づいてキャッシュフローのベクトルを計算する、より汎用的な関数を作成します。入力は、クーポン利率の r、パー(元本)の p、満期までの年数 ttm です。そのために、rep() コマンドを活用します。

この演習はコースの一部です

Rで学ぶ債券の評価と分析

コースを見る

演習の手順

  • rep() と入力変数 rpttm を使って、別解のキャッシュフロー関数を作成し、alt_cf として保存してください。
  • alt_cf を使って、クーポン利率(r)3%(0.03)、パー値(p)$100、満期までの年数(ttm)8年のキャッシュフロー・ベクトルを生成してください。

実践的なインタラクティブ演習

このサンプルコードを完成させて、この演習に挑戦してみましょう。

# Code cash flow function
alt_cf <- function(r, p, ttm) {
  c(rep(p * r, ___ - 1), ___ * (1 + ___))
}

# Generate cf vector
alt_cf(r = ___, p = ___, ttm = ___)
コードを編集して実行