Examples for 'rpart::kyphosis'

Data on Children who have had Corrective Spinal Surgery

Aliases: kyphosis

Keywords: datasets

### ** Examples

fit <- rpart(Kyphosis ~ Age + Number + Start, data = kyphosis)
fit2 <- rpart(Kyphosis ~ Age + Number + Start, data = kyphosis,
              parms = list(prior = c(0.65, 0.35), split = "information"))
fit3 <- rpart(Kyphosis ~ Age + Number + Start, data=kyphosis,
              control = rpart.control(cp = 0.05))
par(mfrow = c(1,2), xpd = TRUE)
plot(fit)
text(fit, use.n = TRUE)
plot(fit2)
text(fit2, use.n = TRUE)
plot of chunk example-rpart-kyphosis-1
[Package rpart version 4.1.19 Index]