#The following example calculates the ages-at-death with 90%PIs of 10 random wear scores
wear <- runif(10,0,16)
BAMSAUR(wear, interval = "prediction", level = 0.90)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.