[Coursera] R Programming : Programming Assignment 2, SOLUTION