Indienen

  Chapter 3 Exercise 14

Log in om je oplossingen te testen.
set.seed(1) x1 <- runif(100) x2 <- 0.5 * x1 + rnorm(100)/10 y <- 2 + 2 * x1 + 0.3 * x2 + rnorm(100) # ... x1 <- c(x1, 0.1) x2 <- c(x2, 0.8) y <- c(y, 6)