Assigment, 1rst version
programming R project