1

我的目标是将模型保存为 R Shiny 应用程序的输入对象,然后为新主题,在应用程序中插入输入,并计算预测概率和相关的 95% CI(或预测区间)。

我做了以下操作来保存模型。

RF.up.samp <- train(PTDCategory_12m ~ X1 + X2 + X3 + X4 + X5 + X6, method = "ranger", 
                    data = training.data,
                    metric = "ROC",
                    trControl = trainControl(method = "boot",
                                             sampling = "up",
                                             #savePredictions = TRUE,
                                             summaryFunction = twoClassSummary, 
                                             classProbs = TRUE), na.action=na.exclude)
saveRDS(RF.up.samp, "./final_model.rds")

但是我只能使用每个类type="prob"的函数中的选项来获得预测概率。predict()如何获得预测概率的 95% CI,例如,[p.hat.lower, p.hat.upper]

4

0 回答 0