Performs a calibration plot on an SummarizedExperiment object, calling the cp4p package functions.

This function is a wrapper to the calibration.plot method of the cp4p package for use with SummarizedExperiment objects.

Usage

wrapperCalibrationPlot(vPVal, pi0Method = "pounds")

Arguments

vPVal

A dataframe that contains quantitative data.

pi0Method

A vector of the conditions (one condition per sample).

Value

A plot

Author

Samuel Wieczorek

Examples

data(subR25prot)
obj <- subR25prot
# Simulate imputation
obj <- NAIsZero(obj, 1)
obj <- NAIsZero(obj, 2)
allComp <- limmaCompleteTest(
SummarizedExperiment::assay(obj[[length(obj)]]), 
design.qf(obj), 
comp.type="OnevsOne")
wrapperCalibrationPlot(allComp$P_Value[, 1])

#> $pi0
#> [1] 0.4723159
#> 
#> $h1.concentration
#> [1] 0.9926566
#> 
#> $unif.under
#> [1] 0.9128457
#>