rpart：节点观察和规则

Question

我试图使用rpart

找出决策树中的观察节点

library(rpart)
fit <- rpart(Kyphosis ~ Age + Number + Start, method = 'class', data =kyphosis)
summary(fit)

summary(fit)的最后几行返回：

Node number 23: 7 observations
  predicted class=present  expected loss=0.4285714  P(node) =0.08641975
    class counts:     3     4
   probabilities: 0.429 0.571

所以我得出结论，终端节点/叶子＃23：

但unique(fit$where)仅返回：9 7 3 8 5。所以没有终端节点23.

使用partykit，我得出了类似的结论：

library(partykit)
z.fit <- as.party(fit)
predict(z.fit, kyphosis, type = 'node')

我错过了什么？

更新，这是我想要的节点号：