R Programs and output graghs for Assignment 1