ดึงคอลัมน์ Close จากหลายตราสาร
ในแบบฝึกหัดที่แล้ว คุณได้เรียนรู้วิธีใช้ do.call(merge, eapply(env, fun)) เพื่อนำฟังก์ชันไปใช้กับแต่ละออบเจกต์ใน environment แล้วรวมผลลัพธ์ทั้งหมดเข้าเป็นออบเจกต์เดียว
คราวนี้ลองนำความรู้นั้นมาแก้ปัญหาที่พบบ่อยในทางปฏิบัติ นั่นคือการโหลดข้อมูลของหลายตราสาร ดึงคอลัมน์ที่ต้องการ แล้วสร้างออบเจกต์เดียวที่รวบรวมคอลัมน์นั้นจากทุกตราสารไว้ด้วยกัน
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การนำเข้าและจัดการข้อมูลทางการเงินใน R
คำแนะนำการฝึกหัด
- ใช้
new.env()เพื่อสร้าง environment ใหม่ชื่อdata_env - ใช้
getSymbols()โหลดข้อมูลเข้าสู่data_envโดยระบุอาร์กิวเมนต์env - เติมคำสั่งที่เตรียมไว้ให้สมบูรณ์ โดยใส่ฟังก์ชันที่เหมาะสมในช่องว่าง
- ดูข้อมูลไม่กี่แถวแรกของ
close_data
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Symbols
symbols <- c("AAPL", "MSFT", "IBM")
# Create new environment
# Load symbols into data_env
# Extract the close column from each object and combine into one xts object
close_data <- ___(merge, ___(data_env, Cl))
# View the head of close_data