死にゆく割合を組み合わせることで、累積的な危険がもたらされるわけではありません。連続時間の危険率は、非常に短い間隔でイベントが発生する条件付き確率です。
h (t )= limΔ T → 0P(t < T≤t+Δt|T>t)Δt
累積ハザードは、年齢/時間にわたる(瞬間的な)ハザード率を統合しています。それは確率を加算ようなものだが、以来非常に小さく、これらの確率も小さな数値である(死亡するなど、危険率は30周りの年齢で0.004の周りでもよいです)。ハザード率は、tより前にイベントを経験していないことを条件としているため、母集団の合計は1を超える場合があります。Δtt
これは離散時間の定式化ですが、を累積してみてください。mx
Rを使用する場合、これらの関数を各1年の年齢間隔での死亡数から概算する小さな例を次に示します。
dx <- c(3184L, 268L, 145L, 81L, 64L, 81L, 101L, 50L, 72L, 76L, 50L,
62L, 65L, 95L, 86L, 120L, 86L, 110L, 144L, 147L, 206L, 244L,
175L, 227L, 182L, 227L, 205L, 196L, 202L, 154L, 218L, 279L, 193L,
223L, 227L, 300L, 226L, 256L, 259L, 282L, 303L, 373L, 412L, 297L,
436L, 402L, 356L, 485L, 495L, 597L, 645L, 535L, 646L, 851L, 689L,
823L, 927L, 878L, 1036L, 1070L, 971L, 1225L, 1298L, 1539L, 1544L,
1673L, 1700L, 1909L, 2253L, 2388L, 2578L, 2353L, 2824L, 2909L,
2994L, 2970L, 2929L, 3401L, 3267L, 3411L, 3532L, 3090L, 3163L,
3060L, 2870L, 2650L, 2405L, 2143L, 1872L, 1601L, 1340L, 1095L,
872L, 677L, 512L, 376L, 268L, 186L, 125L, 81L, 51L, 31L, 18L,
11L, 6L, 3L, 2L)
x <- 0:(length(dx)-1) # age vector
plot((dx/sum(dx))/(1-cumsum(dx/sum(dx))), t="l", xlab="age", ylab="h(t)",
main="h(t)", log="y")
plot(cumsum((dx/sum(dx))/(1-cumsum(dx/sum(dx)))), t="l", xlab="age", ylab="H(t)",
main="H(t)")
お役に立てれば。