# Create a triangle of average outstanding claims as the ratio between O/S Claims
# and Open Claims (i.e. the number of outstanding claims)
avg <- MedMal$MedMalOutstanding / MedMal$MedMalOpen
# Check the level of average inflation Y-o-Y
test<-checkTriangleInflation(avg)
# Plot the results
# A model of exponential inflation fits quite well the level of average O/S claims
# This is particularly evident for DP 1,2,3
plot(test)
# Get the summary in an analytical way to observe the ratios and the number of points used
summary(test)
# Print the output
print(test)
# There is an inflation level equal to .15 at the first development period. It would be
# appropriate to adjust the triangle before proceeding with any estimate method.
Run the code above in your browser using DataLab