เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

การคิดลดกระแสเงินสดของพันธบัตรด้วย Yield ที่ทราบค่า

หลังจากที่จัดทำกระแสเงินสดของพันธบัตรเรียบร้อยแล้ว ขั้นตอนต่อไปคือการคำนวณมูลค่าปัจจุบันของกระแสเงินสดแต่ละรายการ และประเมินมูลค่าพันธบัตร ทั้งนี้ มูลค่าของพันธบัตรคือผลรวมของมูลค่าปัจจุบันของกระแสเงินสดทั้งหมด

ในแบบฝึกหัดนี้ จะคำนวณตัวประกอบมูลค่าปัจจุบัน pv_factor สำหรับกระแสเงินสดแต่ละรายการ เพื่อนำไปคำนวณมูลค่าปัจจุบัน pv ของแต่ละรายการ จากนั้นจึงรวมค่า pv ทั้งหมดเพื่อหามูลค่าของพันธบัตร

พันธบัตรนี้มี yield อยู่ที่ 6% ซึ่งทำหน้าที่เป็นอัตราคิดลด โดย data frame ที่สร้างไว้ในแบบฝึกหัดก่อนหน้าชื่อ cf มีอยู่แล้วใน workspace ของคุณ

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การประเมินมูลค่าและวิเคราะห์พันธบัตรด้วย R

ดูคอร์ส

คำแนะนำการฝึกหัด

  • สร้างคอลัมน์ใหม่ชื่อ t ใน data frame cf เพื่อระบุปีที่ได้รับกระแสเงินสด โดยในที่นี้ปีจะเทียบเท่ากับชื่อแถวใน data frame (1, 2, 3 และต่อไป) ดังนั้นสามารถใช้ rownames() เพื่อกำหนดค่าให้ t ได้โดยตรง แล้วใช้ as.numeric() เพื่อให้แน่ใจว่าค่าใน t เป็นตัวเลข
  • สร้างคอลัมน์ใหม่อีกคอลัมน์ชื่อ pv_factor ใน cf เพื่อเก็บตัวประกอบมูลค่าปัจจุบันของแต่ละปี โดยตัวประกอบนี้คำนวณจาก 1 หารด้วย 1 บวกกับอัตรา yield (ในกรณีนี้คือ 6% หรือ 0.06) ยกกำลังด้วยตัวแปรเวลา (t)
  • สร้างคอลัมน์ pv ใน cf เพื่อเก็บมูลค่าปัจจุบันของกระแสเงินสดในแต่ละปี โดยคำนวณจากกระแสเงินสด (cf) คูณกับตัวประกอบมูลค่าปัจจุบันของปีนั้น (pv_factor)
  • สุดท้าย ใช้ sum() เพื่อรวมค่าทั้งหมดใน pv เพื่อหามูลค่าของพันธบัตร

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

# Add column t to cf
cf$t <- as.numeric(___(___))

# Calculate pv_factor
cf$pv_factor <- 1 / (1 + ___)^___

# Calculate pv
cf$pv <- ___ * ___

# Calculate the bond price
sum(___$___)
แก้ไขและรันโค้ด