R exercise

Chapter 8 exercise 8

Sign in to hand in your solution and get feedback.

set.seed(1) train <- sample(1:nrow(Carseats), nrow(Carseats) / 2) Carseats.train <- Carseats[train, ] Carseats.test <- Carseats[-train, ] #1 set.seed(2) ... #2 set.seed(3) ... #3 #4