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

Cognostics จาก nested data frames

มาคำนวณราคาปิดเฉลี่ย ปริมาณการซื้อขายเฉลี่ย และผลตอบแทนรายปีเป็น cognostics กัน ตัวแปรที่ใช้ในการคำนวณ ได้แก่ open, close, และ volume อยู่ใน data frame แบบซ้อน data ในชุดข้อมูล by_symbol

หมายเหตุ: มีฟังก์ชัน annual_return() เตรียมไว้ให้แล้วเพื่อความสะดวก

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

การแสดงภาพข้อมูลขนาดใหญ่ด้วย Trelliscope ใน R

ดูคอร์ส

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

  • ใช้ map() เพื่อวนคำนวณบน nested data frame ทุกตัวใน data
  • ภายใน map function ให้สร้าง data frame สรุปผลที่ประกอบด้วยราคาปิดเฉลี่ย ปริมาณการซื้อขายเฉลี่ย และผลตอบแทนรายปีเป็นเปอร์เซ็นต์ ดู by_symbol$data[[1]] เพื่อตรวจสอบชื่อคอลัมน์ที่มีอยู่

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

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

library(trelliscopejs)
library(dplyr)
library(purrr)

annual_return <- function(x)
  100 * (tail(x$close, 1) - head(x$open, 1)) / head(x$open, 1)

# Compute by_symbol_avg
by_symbol_avg <- mutate(by_symbol,
  stats = ___(___, function(x) {
    data_frame(
      mean_close = mean(x$___),
      mean_volume = mean(x$___),
      annual_return = annual_return(x)
    )
  }))
แก้ไขและรันโค้ด