R exercise

Chapter 4 exercise 13b

Sign in to hand in your solution and get feedback.

set.seed(1)