Chapter 5 exercise 8

Log in om je oplossingen te testen.
set.seed(1) x <- rnorm(100) y <- x - 2*x^2 + rnorm(100)