A rewrite of the R code used by Herndon, Ash and Pollin to replicate Reinhart-Rogoff