Kode tervektorkan: menghitung jumlah log
Operasi yang umum dalam statistika adalah menghitung jumlah dari log probabilitas. Kode berikut menghitung jumlah log (penjumlahan nilai log).
# x adalah vektor probabilitas
total <- 0
for(i in seq_along(x))
total <- total + log(x[i])
Namun, potongan kode ini dapat ditingkatkan secara signifikan menggunakan kode tervektorkan.
Latihan ini adalah bagian dari kursus
Menulis Kode R yang Efisien
Petunjuk latihan
- Temukan jumlah log dari
xmenggunakan fungsilog()dansum(), sederhanakan perulangan di atas. - Simpan jawaban Anda dalam objek
log_sum.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Initial code
n <- 100
total <- 0
x <- runif(n)
for(i in 1:n)
total <- total + log(x[i])
# Rewrite in a single line. Store the result in log_sum
log_sum <- ___