Creates a tree plot of a spline tree. This corresponds to plotting only the first panel of stPlot(). Code for this function was borrowed from the longRPart package on github.
splineTreePlot(model, colors =NULL)
Arguments
model: a model returned from splineTree()
colors: a list of colors that will be used for the terminal nodes (if NULL, will use a rainbow)