R code asssociated with blog postings