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

ค่าเฉลี่ยถ่วงน้ำหนัก (3)

มาดูตัวอย่างการ recycling กัน สมมติว่าต้องการให้น้ำหนักเท่ากันกับผลตอบแทนหุ้น Microsoft และ Sony กล่าวคือ ลงทุน 50% ใน Microsoft และ 50% ใน Sony

ret <- c(7, 9)

weight <- .5

ret_X_weight <- ret * weight

ret_X_weight

[1] 3.5 4.5

ret คือเวกเตอร์ที่มีความยาว 2 และ weight คือเวกเตอร์ที่มีความยาว 1 R จะนำค่า .5 ใน weight มาใช้ซ้ำสองครั้งเพื่อให้มีความยาวเท่ากับ ret แล้วจึงทำการคำนวณแบบ element-wise

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

R เบื้องต้นสำหรับการเงิน

ดูคอร์ส

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

  • เวกเตอร์ที่มีชื่อ ret ซึ่งเก็บผลตอบแทนของหุ้น 3 ตัวถูกเตรียมไว้ใน workspace แล้ว
  • พิมพ์ ret เพื่อดูผลตอบแทนของหุ้นทั้ง 3 ตัว
  • กำหนดค่า 1/3 ให้กับ weight ซึ่งจะเป็นน้ำหนักที่แต่ละหุ้นได้รับ
  • สร้าง ret_X_weight โดยคูณ ret กับ weight แล้วสังเกตว่า R ทำการ recycle weight อย่างไร
  • ใช้ sum() กับตัวแปร ret_X_weight เพื่อสร้าง portf_ret ที่มีน้ำหนักเท่ากันทุกตัว
  • รันโค้ดบรรทัดสุดท้ายที่คูณเวกเตอร์ความยาว 3 กับเวกเตอร์ความยาว 2 R จะนำค่าแรกของเวกเตอร์ความยาว 2 มาใช้ซ้ำ แต่ให้สังเกตคำเตือนที่ปรากฏขึ้นด้วย!

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

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

# Print ret


# Assign 1/3 to weight
weight <- 

# Create ret_X_weight
ret_X_weight <- 

# Calculate your portfolio return
portf_ret <- 

# Vector of length 3 * Vector of length 2?
ret * c(.2, .6)
แก้ไขและรันโค้ด