Simulate sd per age
simSD(age)
age
return predicted sd
## Not run: x <- simSD(a) ## End(Not run)
Useful links