library("MASS") # for Boston Housing data
library("rpart")
model <-rpart(medv~., data=Boston)
print(model)
plot(model); text(model, cex=0.8)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.