## Importing log-mortality data from Portugal:
data(PT)
Y <- PT
## Fitting the model
fit = blc(Y = Y, M = 100, bn = 20)
## Log-mortalities estimates for each age and year in model fitted
fitted(fit, prob = 0.95)
Run the code above in your browser using DataLab