Gabungkan banyak instrumen ke dalam satu objek

Salah satu paradigma melibatkan pengimporan data ke dalam environment baru. Lalu Anda dapat menggunakan eapply() untuk memanggil sebuah fungsi pada setiap objek di environment tersebut, mirip seperti yang dilakukan lapply() pada setiap elemen sebuah list. Sama seperti lapply(), eapply() mengembalikan sebuah list.

Kemudian Anda dapat menggabungkan semua elemen list menjadi satu objek dengan menggunakan do.call(), yang seolah-olah membuat R secara programatis mengetik dan menjalankan perintah untuk Anda. Alih-alih mengetik merge(my_list[[1]], my_list[[2]]], ...), Anda bisa mengetik do.call(merge, my_list).

Latihan ini adalah bagian dari kursus

Mengimpor dan Mengelola Data Keuangan di R

Lihat Kursus

Petunjuk latihan

Gunakan eapply() untuk memanggil head() pada setiap objek di data_env. Simpan hasilnya ke data_list.
Gunakan do.call() dan merge() untuk menggabungkan semua elemen data_list menjadi satu objek xts bernama data_merged.
Karena objek dalam sebuah environment tidak berurutan, tidak ada jaminan urutan kolom di data_merged. Gunakan OHLC() untuk menatanya, dan simpan datanya di data_ohlc.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# Call head on each object in data_env using eapply
data_list <- ___(data_env, ___)

# Merge all the data_list elements into one xts object
data_merged <- ___(___, data_list)

# Ensure the columns are ordered: open, high, low, close

Edit dan Jalankan Kode