Ekspektasi hidup curtate vs. complete

Masih menggunakan tabel hidup perempuan Belgia tahun 1999, Cynthia ingin mengetahui ekspektasi hidup untuk bayi baru lahir dan perempuan berusia 18 tahun, menggunakan data tahun 1999. Selain itu, ia ingin memeriksa apakah ia dapat memverifikasi secara empiris selisih 0,5 antara ekspektasi hidup complete dan curtate yang dibahas selama kelas Matematika Asuransi Jiwa.

Ingat dari video bahwa ekspektasi hidup curtate dapat dihitung sebagai

$$ E[K_x] = \sum_{k=1}^{\infty} {}_kp_x. $$

Probabilitas bertahan satu tahun px dan ekspektasi hidup complete ex telah dimuat sebelumnya.

Latihan ini merupakan bagian dari kursus

Penilaian Produk Asuransi Jiwa di R

Lihat Kursus

Instruksi latihan

Hitung ekspektasi hidup curtate untuk (0), seorang perempuan bayi baru lahir. Pertama, definisikan probabilitas bertahan kp0 sebagai hasil kali kumulatif dari px. Lalu, cetak jumlah kp0.
Ulangi untuk (18), seorang perempuan berusia 18 tahun. Kali ini, lakukan subset px mulai usia 18 tahun ke atas sebelum menghitung hasil kali kumulatif.
Bandingkan dengan ekspektasi hidup complete. Cetak subset ex yang sesuai dengan usia 0 dan 18 dalam satu baris menggunakan sebuah vektor berukuran 2 di dalam tanda kurung siku.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# Survival probabilities and curtate expected future lifetime of (0)
kp0 <- ___
___

# Survival probabilities and curtate expected future lifetime of (18)
kp18 <- ___(px[(___):___])
___

# Complete expected future lifetime of (0) and (18)
___[c(___, ___)]

Edit dan Jalankan Kode