การหา Yield ของพันธบัตร
สมมติว่ามีคนเสนอซื้อพันธบัตรที่คุณถืออยู่ในราคา $95.79 โดยพันธบัตรนี้มีมูลค่าที่ตราไว้ $100 อัตราดอกเบี้ย (coupon rate) 5% และอายุครบกำหนด 5 ปี ในสถานการณ์นี้ คุณต้องการทราบว่า Yield ของพันธบัตรนี้คือเท่าไร เพื่อนำไปเปรียบเทียบกับ Yield ของหลักทรัพย์อื่นที่ใกล้เคียงกัน และประเมินว่าราคาที่เสนอมานั้นสูงหรือต่ำเกินไปหรือไม่
วิธีหนึ่งในการหา Yield คือการลองผิดลองถูก (trial-and-error) เริ่มด้วยการเดา Yield เบื้องต้น เช่น 5% แล้วคำนวณราคาพันธบัตรที่ Yield นั้น หากราคาที่ได้สูงเกินไป แสดงว่าต้องเพิ่ม Yield ในการเดาครั้งต่อไป เนื่องจากราคาและ Yield มีความสัมพันธ์แบบผกผันกัน
สมมติว่าเดา Yield ครั้งต่อมาเป็น 7% ราคาที่ได้จะต่ำเกินไป ซึ่งหมายความว่า Yield ที่แท้จริงอยู่ระหว่าง 5% ถึง 7% จึงลองใช้ Yield 6% ซึ่งจะให้คำตอบที่ถูกต้อง
ในแบบฝึกหัดนี้ จะคำนวณราคาพันธบัตรโดยใช้ Yield 5%, 6% และ 7% ผ่านฟังก์ชัน bondprc() ที่โหลดไว้ในเวิร์กสเปซแล้ว โปรดจำไว้ว่าเป้าหมายคือการวิเคราะห์ย้อนกลับเพื่อหาลักษณะของพันธบัตรที่มีมูลค่า $95.79
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การประเมินมูลค่าและวิเคราะห์พันธบัตรด้วย R
คำแนะนำการฝึกหัด
- ใช้
bondprc()เพื่อคำนวณมูลค่าพันธบัตรโดยใช้ Yield 5% โดยพันธบัตรนี้มีมูลค่าที่ตราไว้ $100 อัตราดอกเบี้ย 5% และอายุครบกำหนด 5 ปี - เรียกใช้
bondprc()อีกครั้งเพื่อคำนวณมูลค่าพันธบัตรโดยใช้ Yield 7% - เรียกใช้
bondprc()ครั้งสุดท้ายเพื่อคำนวณมูลค่าพันธบัตรโดยใช้ Yield 6%
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Value bond using 5% yield
bondprc(p = ___, r = ___, ttm = ___, y = ___)
# Value bond using 7% yield
# Value bond using 6% yield