Contents

1 R
2 谿瑚襭


1 R #

library(rpart)
cart=rpart(Species ~., data=iris, method="class")
plot(cart)
text(cart, use.n=FALSE, pretty=0)

2 谿瑚襭 #