CART算法的程序包是tree，函数也是tree。程序如下：
oldpar=par(mar=c(3,3,1.5,1),mgp=c(1.5,0.5,0),cex=0.7) #设置窗口参数
library(tree)
data(iris)
ir.tr=tree(Species~.,iris) #对品种进行CART分类
summary(ir.tr)
plot(ir.tr);text(ir.tr) #画决策树图
oldpar=par(mar=c(3,3,1.5,1),mgp=c(1.5,0.5,0),cex=0.7) #设置窗口参数
library(tree)
data(iris)
ir.tr=tree(Species~.,iris) #对品种进行CART分类
summary(ir.tr)
plot(ir.tr);text(ir.tr) #画决策树图
