t_dat <- make_whole(sst_Med)
res <- detect(t_dat, climatology_start = 1983, climatology_end = 2012) # using default values
out <- block_average(res)
summary(glm(count ~ year, out, family = "poisson"))
## Not run:
# plot(out$year, out$count, col = "salmon", pch = 16,
# xlab = "Year", ylab = "Number of events")
# lines(out$year, out$count)
# ## End(Not run)
Run the code above in your browser using DataLab