Return tumpang tindih

Saat Anda mengagregasikan deret dengan menjumlahkan log-return harian ke interval yang lebih panjang, Anda menganalisis jumlah observasi yang lebih sedikit. Untuk mempertahankan kuantitas data, Anda dapat menghitung return tumpang tindih dengan fungsi rollapplyr(); hal ini juga menciptakan korelasi yang kuat antarobservasi.

Ada 5 hari bursa dalam rata-rata minggu kalender. Dengan menghitung jumlah bergerak 5 hari dari log-return data indeks harian, Anda memperoleh perkiraan return mingguan tumpang tindih yang berakhir pada tiap minggu kalender. Demikian pula, menghitung jumlah bergerak 21 hari memberikan perkiraan return bulanan tumpang tindih, dan menghitung jumlah bergerak 63 hari memberikan perkiraan return triwulanan tumpang tindih.

Mari kita lihat contoh dengan data return harian Dow Jones dalam djx. Karena 5 nilai digunakan untuk menghitung setiap jumlah bergerak, 4 nilai pertama pada hasilnya adalah NA. Dalam kasus ini, kita akan menggunakan pengindeksan untuk menghapusnya:

> djx5 <- rollapplyr(djx, width = 5, FUN = sum)
> head(djx5)
                  ^DJI
2008-01-03          NA
2008-01-04          NA
2008-01-07          NA
2008-01-08          NA
2008-01-09 -0.02394677
2008-01-10 -0.01571869

> djx5 <- djx5[-(1:4)]

Pada latihan ini, Anda akan menghitung jumlah bergerak untuk berbagai interval dari djx, yang sudah dimuat di ruang kerja Anda. Selanjutnya, Anda akan mencari skewness dan kurtosis dari data yang dihasilkan serta melakukan uji Jarque-Bera seperti pada latihan sebelumnya. Apakah return tumpang tindih tampak lebih normal?

Latihan ini merupakan bagian dari kursus

Manajemen Risiko Kuantitatif dengan R

Lihat Kursus

Instruksi latihan

Hitung jumlah bergerak 21 hari dari log-return dalam djx, hapus 20 nilai pertama, lalu tetapkan ke djx21.
Hitung jumlah bergerak 63 hari dari log-return dalam djx, hapus 62 nilai pertama, lalu tetapkan ke djx63
Gunakan merge() dan all = FALSE untuk menggabungkan djx, djx21, dan djx63 dalam urutan tersebut, lalu tetapkan ke djx2. Plot dengan plot.zoo().
Gunakan apply() dan fungsi yang sesuai untuk menghitung skewness dan kurtosis untuk masing-masing deret dalam djx2.
Gunakan apply() dan fungsi yang sesuai untuk melakukan uji Jarque-Bera pada masing-masing deret dalam djx2.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# Calculate a 21-day moving sum of djx
djx21 <- ___(___, ___, ___)[___]

# Calculate a 63-day moving sum of djx
djx63 <- ___(___)[___]

# Merge the three series and plot
djx2 <- ___(___)
___(___)

# Compute the skewness and kurtosis for each series in djx2
___(___)
___(___)

# Conduct the Jarque-Bera test to each series in djx2
___(___)

Edit dan Jalankan Kode