barPlotModelComparison: Make A Bar Plot Comparing Performance Between Two 'S4'...

Description Usage Arguments Value Examples

Description

Make A Bar Plot Comparing Performance Between Two S4 Objects Representing Mathematical Models.

Usage

1
barPlotModelComparison(model1, model2, ...)

Arguments

model1

AnS4 object containing results of a mathematical model

model2

An S4 object containing results of a different mathematical model, but with the same or overlapping samples.

...

Allow new parameters to be defined for this generic.

Value

A bar plot comparing some aspect of model1 and model2

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
data(sampleCohortList)
data(sampleValPCOSPmodel)
data(sampleICGCmicro)

# Set parallelization settings
BiocParallel::register(BiocParallel::SerialParam())

# Setup the models
set.seed(1987)
clinicalModel <- ClinicalModel(sampleICGCmicro,
  formula='prognosis ~ sex + age + T + N + M + grade',
  randomSeed=1987)

# Train the models
trainedClinicalModel <- trainModel(clinicalModel)

# Make predctions
clinicalPredCohortList <- predictClasses(sampleCohortList[c('PCSI', 'TCGA')],
  model=trainedClinicalModel)

# Validate the models
validatedClinicalModel <- validateModel(trainedClinicalModel,
  valData=clinicalPredCohortList)

# Plot the comparison
modelCompBarPlot <- barPlotModelComparison(validatedClinicalModel,
 sampleValPCOSPmodel, stat='AUC')

bhklab/PanCuRx documentation built on Dec. 30, 2021, 4:59 p.m.