Rata-rata tertimbang (2)

Tunggu sebentar, Lore mengajarkan cara yang jauh lebih baik untuk melakukan ini! Ingat, R melakukan aritmetika dengan vektor! Bisakah Anda memanfaatkan hal ini untuk menghitung imbal hasil portofolio dengan lebih efisien? Pikirkan baik-baik tentang kode berikut:

ret <- c(5, 7)
weight <- c(.4, .6)

ret_X_weight <- ret * weight

sum(ret_X_weight)

[1] 6.2

Pertama, hitung ret * weight, yang mengalikan setiap elemen dalam vektor untuk membuat vektor baru ret_X_weight. Yang perlu Anda lakukan selanjutnya hanyalah menjumlahkan bagiannya, jadi gunakan sum() untuk menjumlahkan setiap elemen dalam vektor.

Sekarang giliran Anda!

Latihan ini merupakan bagian dari kursus

Pengantar R untuk Keuangan

Lihat Kursus

Instruksi latihan

ret dan weight untuk Microsoft dan Sony sudah didefinisikan untuk Anda lagi, tetapi kali ini dalam bentuk vektor!
Tambahkan nama perusahaan ke vektor ret dan weight Anda.
Gunakan aritmetika tervektorisasi untuk mengalikan ret dan weight.
Cetak ret_X_weight untuk melihat hasilnya.
Gunakan sum() untuk mendapatkan total portf_ret.
Cetak portf_ret dan bandingkan dengan latihan sebelumnya!

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# Weights, returns, and company names
ret <- c(7, 9)
weight <- c(.2, .8)
companies <- c("Microsoft", "Sony")

# Assign company names to your vectors
names(ret) <- 
names(weight) <- 

# Multiply the returns and weights together 
ret_X_weight <- 

# Print ret_X_weight


# Sum to get the total portfolio return
portf_ret <-

# Print portf_ret

Edit dan Jalankan Kode