Seberapa besar peluang Cynthia hidup hingga 100 tahun?

Sebagai penggemar statistik R, Cynthia menikmati eksplorasi pertamanya terhadap tabel kehidupan tahun 1999. Dengan R, ia ingin memperoleh wawasan lebih lanjut. Cynthia sangat tertarik pada probabilitas menjadi seorang centenarian. Berapa probabilitas ini bagi bayi berusia nol tahun, menggunakan data tahun 1999? Lalu bagi seseorang berusia 18 tahun? Dapatkah Anda mencari cara menghitung probabilitas tersebut? Kemudian buat visualisasi dari \((k,\ _kp_{18})\).

Dalam latihan berikut, tabel kehidupan periode 1999 untuk perempuan di Belgia telah dimuat sebelumnya dan disimpan dalam objek life_table, dan kolom lx telah diekstraksi untuk Anda.

Latihan ini merupakan bagian dari kursus

Penilaian Produk Asuransi Jiwa di R

Lihat Kursus

Instruksi latihan

Gunakan lx untuk menghitung probabilitas seorang bayi berusia nol tahun menjadi centenarian (yakni mencapai usia 100). Pastikan untuk mengekstrak berdasarkan indeks.
Hitung probabilitas yang sama untuk seseorang berusia 18 tahun.
Hitung dan plot probabilitas bagi seseorang berusia 18 tahun untuk bertahan hidup hingga usia 18, 19, … hingga 100. Definisikan k sebagai vektor dari 0 hingga 82. Gunakan k untuk menghitung probabilitas tersebut.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# Compute the probabilty for (0) to reach the age 100
___

# Compute the probabilty for (18) to reach the age 100
___

# Plot the survival probabilties for (18) up to age 100
k <- ___
plot(k, ___, 
    pch = 20, 
    xlab = "k", 
    ylab = expression(paste(""[k], "p"[18])), 
    main = "Survival probabilities for (18)")

Edit dan Jalankan Kode