course 'R Programming' programming assignment 1