Question

我目前在R中使用@implementation Authentication + (NSDictionary*)JSONKeyPathsByPropertyKey { return @{ @"expiresAt" : @"expiresAt", @"status" : @"status", @"sessionToken" : @"sessionToken", @"stateToken" : @"stateToken", @"relayState" : @"relayState", @"user" : @"_embeded/user", }; } + (NSValueTransformer *)userJSONTransformer { return [NSValueTransformer mtl_JSONDictionaryTransformerWithModelClass:User.class]; } @end包来组合在插入符号中训练的多个模型。我使用caretEnsemble函数从同一个包中得到了最终训练模型列表（比如说model_list）。

caretList

我提供的列车控制对象如下：

    model_list <- caretList(
    x = input_predictors, 
    y = input_labels, 
    metric = 'Accuracy',
    tuneList = list(
        randomForestModel =   caretModelSpec(method='rf', 
                                             tuneLength=1, 
                                             preProcess=c('BoxCox', 'center', 'scale')), 
        ldaModel = caretModelSpec(method='lda', 
                                  tuneLength=1, 
                                  preProcess=c('BoxCox', 'center', 'scale')),
        logisticRegressionModel =  caretModelSpec(method='glm', 
                                                  tuneLength=1, 
                                                  preProcess=c('BoxCox', 'center', 'scale'))
    ), 
    trControl = myTrainControl
)

现在我在这些模型列表上进行培训：

    myTrainControl = trainControl(method = "cv", 
                              number = 10, 
                              index=createResample(training_input_data$retinopathy, 10),
                              savePredictions = TRUE, 
                              classProbs = TRUE, 
                              verboseIter = TRUE, 
                              summaryFunction = twoClassSummary)

在ens <- caretEnsemble(model_list)上应用summary会告诉我所选模型（ens之外），分配给这些所选模型的权重，每个模型的样本外model_list值选定的模型，最后是AUC的样本AUC值。

现在我想计算ens对其他测试数据的性能（以获得有关样本外性能的想法）。我将如何实现它？

我正在尝试：

ens

但它给了我一个错误：

ensPredictions <- predict(ens, newdata = test_data)

Answer 1

我首先检查测试集是否具有训练集的所有功能。

如何使用R中的caretEnsemble包预测新数据集？

1 个答案: