R Programming Week-2, Programming assigment 1