data(iris)
M=fit(Species~.,iris,model="dt")
savemodel(M,"iris.model")
M=loadmodel("iris.model")
print(M)
M=mining(Species~.,iris,model="dt")
savemining(M,"iris.model")
M=loadmining("iris.model")
print(M)
Run the code above in your browser using DataLab