Generosity of Asian Central Banks

[This article was first published on Timely Portfolio, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

The only thing that separates the United States from Europe and the notorious PIIGS is the generosity of Asian Central Banks who have been consistently quantitatively easing since 1998 (Join the Reserves).

From TimelyPortfolio

Without this generosity, the United States could very easily have entered a death spiral (see Death Spiral of a Country and Death Spiral Warning Graph) in 2008 and still might fall into this disastrous trap.

Deliberately attacking this very tenuous thread seems foolish, but this foolish action has found support with our fine politicians Washington Post “Senate approves China currency bill”.  The US needs to recruit some US $ buyers, but unfortunately there are none to fill the multi-trillion dollar gap.

Even more concerning is the focus on China who has been steadily attacking the problem.  The focus on China does not make sense when you look at the appreciation of the Chinese Yuan.  I see a lot more Korean cars on the road and TVs and appliances in the stores, but I do not hear any mention of the extreme undervaluation of the Korean Won to the US$ but especially the Japanese Yen, so it appears the Koreans Won.

From TimelyPortfolio

I agree that the US$ reserve building needs to stop, but let’s not deliberately induce a positive feedback death spiral.

R code (click to download from Google Docs):

require(quantmod)
require(PerformanceAnalytics)

getSymbols(“DEXCHUS”,src=”FRED”)
getSymbols(“DEXKOUS”,src=”FRED”)

plot.zoo(merge(1/DEXCHUS,100/DEXKOUS)[“1997::”,],screens=1,lwd=2,
    col=c(“lightblue4″,”antiquewhite4”),
    xlab=”Year”,ylab=NA,
    main=”Chinese Yuan and Korean Won
    1997 to Sep 2011″)
legend(“right”, c(“China”,”Korea”), lwd = 2, bty=”n”,
    col=c(“lightblue4″,”antiquewhite4”),y.intersp=2,
    text.col=c(“lightblue4″,”antiquewhite4”))

To leave a comment for the author, please follow the link and comment on their blog: Timely Portfolio.

R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Never miss an update!
Subscribe to R-bloggers to receive
e-mails with the latest R posts.
(You will not see this message again.)

Click here to close (This popup will not appear again)