Я разработал CART-анализ путем рекурсивного разделения с помощью пакета 'rpart'.
«Формула» rpart-объекта ist «время» и «событие» (смерть).
fit <- rpart(Surv(md2_1$Zeit, md2_1$Status) ~ M + T + N + Histo +Alter, data = md2_1)
plot(as.party(fit), tp_arggs = list(id=FALSE))
md2_1 - это мой тренировочный набор данных. Я получаю Tree-plot, но теперь я хочу проверить RPA с внешним набором данных. Я попробовал функциюgnast ().
Pred <- predict(fit, newdata=md2_2)
md2_2 - мой тестовый набор данных. Как я могу сравнить прогнозы с реальным наблюдаемым результатом?
У кого-нибудь есть идея?
С наилучшими пожеланиями!