# NOT RUN {
data(danish)
out <- gpd(danish, 10)
# }
# NOT RUN {
plot(out)
# }
# NOT RUN {
# }
# NOT RUN {
Make a plot selection (or 0 to exit):
# }
# NOT RUN {
1: plot: Excess Distribution
# }
# NOT RUN {
2: plot: Tail of Underlying Distribution
# }
# NOT RUN {
3: plot: Scatterplot of Residuals
# }
# NOT RUN {
4: plot: QQplot of Residuals
# }
Run the code above in your browser using DataLab