Switched front page R function code to Gist