# NOT RUN {
# Example 1 --- Makeham --- 4 tables ----------
x1 = 45:100
L1 = "makeham"
C1 = matrix(c(0.00717, 0.07789, 0.00363,
0.01018, 0.07229, 0.00001,
0.00298, 0.09585, 0.00002,
0.00067, 0.11572, 0.00078),
nrow = 4, dimnames = list(1:4, c("A", "B", "C")))
LawTable(x = x1, par = C1, law = L1, scale.x = TRUE)
# Example 2 --- Heligman-Pollard -- 1 table ----
x2 = 0:100
L2 = "HP"
C2 = c(0.00223, 0.01461, 0.12292, 0.00091,
2.75201, 29.01877, 0.00002, 1.11411)
LawTable(x = x2, par = C2, law = L2, scale.x = FALSE)
# }
Run the code above in your browser using DataLab