Cousera - R Programming, Assignment 2