construct decision tree in r code example

Example: decision tree r

library(ISLR)
data(package="ISLR")
carseats<-Carseats