This is my full code:
ibrary(tree) library(ISLR) attach(Carseats) High = ifelse(Sales <= 8, "No", "Yes") Carseats = data.frame(Carseat