Cognostics từ các data frame lồng nhau
Hãy tính giá đóng cửa trung bình, khối lượng trung bình và lợi nhuận hằng năm làm cognostics. Các biến làm cơ sở cho các phép tính này, open, close, và volume, nằm bên trong data frame lồng nhau data trong bộ dữ liệu by_symbol của chúng ta.
Lưu ý: đã có sẵn một hàm tiện lợi, annual_return().
Bài tập này là một phần của khóa học
Trực quan hóa Dữ liệu Lớn với Trelliscope trong R
Hướng dẫn bài tập
- Dùng
map()để tính trên từng data frame lồng nhau trongdata. - Bên trong hàm map, tạo một data frame tóm tắt gồm giá đóng cửa trung bình, khối lượng trung bình, và lợi nhuận phần trăm theo năm. Xem
by_symbol$data[[1]]để nhớ lại các tên cột có sẵn.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
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)
)
}))