Started to follow Google's style guide for R; changed the function names, converted tabs into spaces and changed the indentation into two spaces.