Dette er Programming Assignment 2 From R programming course (week3)