# NOT RUN {
# }
# NOT RUN {
summary <- SPDsimulationTest(data=SAAD,
calcurve=shcal20,
calrange=c(2500,14000),
pars=-0.0001674152,
type='exp')
plotSimulationSummary(summary)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab