Has Ireland gotten any warmer? Ask any punter on the street and they will happily inform you of wild swings, trends and dips. “Back when I was a child”, “when I was younger”, or “years ago” are the usual refrains.
What’s the evidence? To answer this, I will use the temperature data from my previous post alongside the R package bcp. The bcp package stands for Bayesian Change Point, and it implements the change point methodology of Barry & Hartigan (1993). A good overview of how to use the bcp R package is offered by Erdman & Emerson (2007).
These series are monthly and run from 1866 to 2011. There are two measures for each month, the average daily high or low. I use both here, and perform the multivariate bcp procedure for each month separately, with average high and low for each month.
The figure above shows the output produced when I look at the January temperatures. Clearly, there are no major changes. The January temperature in Ireland is the same now as it was in 1866. The results for the other months are very similar. However, there are some changes in the October series, with both the posterior means for both max and min temperatures increasing by around 1 degree Celsius (see below).
Has Ireland gotten warmer? Yes, but only in October, for some reason unknown to me.
# with web-scraped data from the previous post
library(bcp)
cold <- NULL
for (i in 1:12){
mins <- armagh[armagh[,2]==i,4]
cold <- cbind(cold,mins)
}
cold <- cold[14:159,]
warm <- NULL
for (i in 1:12){
maxs <- armagh[armagh[,2]==i,3]
warm <- cbind(warm,maxs)
}
warm <- warm[14:159,]
bcp.0 <- bcp(cbind(cold[,1],warm[,1]), burnin = 1000, mcmc = 5000)
plot(bcp.0)
bcp.0 <- bcp(cbind(cold[,10],warm[,10]), burnin = 1000, mcmc = 5000)
plot(bcp.0)
DiffusePrioR 