Programmin assignment #2 R-ptogramming@Coursera