Here's the code Im using in R.
plot3<-qplot(y = ('year' -1 ), diff(infl), geom = 'path', xlab='Year', ylab='% change Inflation', main='Year on Year difference in inflation rate')
plot4<-qplot(y= ('year' - 1), diff(unem), geom = 'path', xlab='Year', ylab='% change in Unemployment', main= 'Year on Year difference in unemployment rate', col='blue')