Coursera - R Programming course - Quiz 1 script