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

การประเมินมูลค่าพันธบัตร

ในบทที่ 1 คุณได้ประเมินมูลค่าพันธบัตรโดยใช้วิธีทีละขั้นตอน ในแบบฝึกหัดนี้ จะประเมินมูลค่าพันธบัตรที่มีมูลค่าที่ตราไว้ $100 อัตราดอกเบี้ย (coupon rate) 3% และอายุครบกำหนด 8 ปี โดยจะกำหนดกระแสเงินสดของพันธบัตรและคำนวณมูลค่าปัจจุบันของกระแสเงินสดแต่ละรายการโดยใช้อัตราผลตอบแทน Aaa ที่ได้จากแบบฝึกหัดก่อนหน้า

ออบเจกต์ aaa_yield ถูกโหลดไว้ในพื้นที่ทำงานของคุณแล้ว โดยมีค่าเท่ากับ 0.0341

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

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

ดูคอร์ส

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

  • สร้างออบเจกต์กระแสเงินสด (cf) ที่มีกระแสเงินสดของพันธบัตร
  • ใช้ data.frame() เพื่อแปลง cf เป็น data frame เพื่อให้สามารถเพิ่มตัวแปรอื่น ๆ ที่จำเป็นสำหรับการวิเคราะห์ได้
  • เพิ่มตัวบ่งชี้เวลา (cf$t) ที่แสดงปีตั้งแต่ 1 ถึง 8 โดยใช้คำสั่ง seq()
  • คำนวณ PV factor (cf$pv_factor) จากอัตราผลตอบแทน Moody's Aaa (aaa_yield) และตัวบ่งชี้เวลา (cf$t)
  • คำนวณมูลค่าปัจจุบันของกระแสเงินสดแต่ละรายการ (cf$pv) โดยนำ cf$cf คูณกับ PV factor (cf$pv_factor)
  • สุดท้าย คำนวณราคาของพันธบัตรโดยใช้ sum() ของมูลค่าปัจจุบันของกระแสเงินสดทั้งหมด

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

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

# Layout the bond's cash flows
cf <- c(___, ___, ___, ___, ___, ___, ___, ___)

# Convert to data.frame
cf <-

# Add time indicator
cf$t <- seq(___, ___, ___)

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

# Calculate PV
cf$pv <-

# Price bond
sum(___)
แก้ไขและรันโค้ด