| compareModels {PDATK} | R Documentation |
S4 ObjectsCompare Two Mathematical Models Represented as S4 Objects
compareModels(model1, model2, ...)
model1 |
A |
model2 |
A |
... |
Allow new parameters to be defined for this generic. |
A S4 object with statistics about the performance of each model.
data(sampleValPCOSPmodel)
data(sampleClinicalModel)
data(sampleCohortList)
# Set parallelization settings
BiocParallel::register(BiocParallel::SerialParam())
# Train the model
trainedClinicalModel <- trainModel(sampleClinicalModel)
# Predict risk/risk-class
ClinicalPredPCSI <- predictClasses(sampleCohortList[c('PCSI', 'TCGA')],
model=trainedClinicalModel)
# Validate the models
validatedClinicalModel <- validateModel(trainedClinicalModel,
valData=ClinicalPredPCSI)
# Compare the models
modelComp <- compareModels(sampleValPCOSPmodel, validatedClinicalModel)
head(modelComp)