plot_enrichment_summaries {BioPET}

Plotting Prognostic Enrichment Estimates

Description

Plot summaries of prognostic enrichment of clinical trials estimated by the enrichment_analysis and enrichment_simulation functions.

Usage

plot_enrichment_summaries(x, text.size.x.axis = 10, text.size.y.axis = 10,
  text.size.plot.title = 10, text.size.axis.ticks = 10,
  annotate.no.screening.cost = FALSE, smooth.roc = TRUE)

Arguments

x

Object returned by either the enrichment_analysis or the enrichment_simulation function.

text.size.x.axis

Size of text for the x-axis of plots. Defaults to 10.

text.size.y.axis

Size of text for the y-axis of plots. Defaults to 10.

text.size.plot.title

Size of text for the plot titles. Defaults to 10.

text.size.axis.ticks

Size of axis tick marks for plots. Defaults to 10.

annotate.no.screening.cost

Logical indicating whether to annotate the relative to total cost curve at the point where no biomarker screening occurs. Defaults to FALSE

smooth.roc

Logical indicating whether the ROC curves (plotting with the roc() function in the ‘pROC’ package) should be smoothed. Defaults to TRUE.

Value

A grid of either 4 or 6 plots, summarizing the results of either the enrichment_analysis or the enrichment_simulation function.

See Also

enrichment_analysis, enrichment_simulation

Examples

data(dcaData)
# one marker
analysis.single.marker <- enrichment_analysis(Cancer ~ Marker1,
data=dcaData,
reduction.under.treatment=0.3,
cost.screening=100, cost.keeping=1000)
plot_enrichment_summaries(analysis.single.marker)

# two markers
analysis.two.markers <- enrichment_analysis(Cancer ~ Marker1 + Marker2,
data=dcaData,
reduction.under.treatment=0.3,
cost.screening=100,
cost.keeping=1000)
plot_enrichment_summaries(analysis.two.markers)