デュレーションを計算する
Chapter Threeでは、近似デュレーションの計算式を学びました。おさらいとして、近似デュレーションの式は次のとおりです。
$$(P(down) - P(up)) / (2 * P * \Delta y)$$
ここで、$P$は本日時点の債券価格、$P(up)$は利回りが上昇した場合の価格、$P(down)\(は利回りが低下した場合の価格、\)\Delta y$は想定する利回り変化です。
この演習では、デュレーションを計算します。具体的には、bondprc()関数を使ってpx_upとpx_downを求めます。
前の演習で作成したオブジェクトpxとaaa_yieldはワークスペースに読み込まれています。この演習では、想定する利回り変化は1%の上昇とします。これまでと同様に、クーポンレートは3%（0.03）、満期は8年です。
この演習はコースの一部です
Rで学ぶ債券の評価と分析
演習の手順
- 利回りが1%上昇したときの債券価格を
bondprc()で計算し、px_upに保存します。 - 利回りが1%低下したときの債券価格を
bondprc()で計算し、px_downに保存します。 - 上の式を使い、
px、px_up、px_downからdurationを計算します。 durationに基づき、価格へのデュレーションのパーセンテージ効果（duration_pct_change）を計算して表示します。- デュレーションに基づく価格のドル効果（
duration_dollar_change）を計算して表示します。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Calculate bond price when yield increases
px_up <- bondprc(p = ___, r = ___, ttm = ___, y = ___)
# Calculate bond price when yield decreases
px_down <-
# Calculate duration
duration <- (___ - ___) / (2 * ___* ___)
# Calculate percentage effect of duration on price
duration_pct_change <-
duration_pct_change
# Calculate dollar effect of duration on price
duration_dollar_change <-
duration_dollar_change