# NOT RUN {
data(Fort)
extremalindex(Fort$Prec, 0.395, method="runs", run.length=9, blocks=Fort$year)
# }
# NOT RUN {
tmp <- extremalindex(Fort$Prec, 0.395, method="runs", run.length=9, blocks=Fort$year)
tmp
ci(tmp)
tmp <- extremalindex(Fort$Prec, 0.395, method="intervals", run.length=9, blocks=Fort$year)
tmp
ci(tmp)
# }
Run the code above in your browser using DataLab