recordsPlot(andmed[1:300])

Rekordite arv on küll keskmiselt oodatavast mõneti suurem, ent siiski igati oodatavas skaalas. Seega ei ole selle graafiku põhjal IID eelduses kahelda.

 op=par(mfrow=c(1,2))
 xacfPlot(andmed[1:300],which=3)
 xacfPlot(andmed[1:300],which=4)
par(op)

Mõlemad autokorrelatsionifunktsioonid mahuvad ilusasti IID korral oodatava usalduspiiridesse. 

gpdFit(andmed[1:300],u=0)

ks.test(andmed[1:300],pgpd,xi=0.41,beta=1.65)

Võimalikke kontrollimise viise on muidugi mitmeid, ent kui juba "valesti kasutatud" Kolmogorov-Smirnovi test ütleb, et tegu ei ole sellest jaotusest pärit andmetega, siis võib selles küll üpris kindel olla.