testDropout: Test for existance of drop-out with log-likelihood ratio test

Description Usage Arguments Value Author(s) See Also Examples

View source: R/srcLineagePulse_runHypothesisTests.R

Description

Performs one test for entire data set.

Usage

1
testDropout(objLP)

Arguments

objLP

(LineagePulseObject) LineagePulseObject with fitted null and alternative models.

Value

(data frame) Summary of hypothesis test

Author(s)

David Sebastian Fischer

See Also

Called by user.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
lsSimulatedData <- simulateContinuousDataSet(
    scaNCells = 100,
    scaNConst = 10,
    scaNLin = 10,
    scaNImp = 10,
    scaMumax = 100,
    scaSDMuAmplitude = 3,
    vecNormConstExternal=NULL,
    vecDispExternal=rep(20, 30),
    vecGeneWiseDropoutRates = rep(0.1, 30))
matDropoutPredictors <- as.matrix(data.frame(
    log_means = log(rowMeans(lsSimulatedData$counts)+1) ))
objLP <- runLineagePulse(
    counts = lsSimulatedData$counts,
    dfAnnotation = lsSimulatedData$annot,
    strMuModel = "splines", scaDFSplinesMu = 6,
    strDropModel="logistic", 
    matPiConstPredictors = matDropoutPredictors)
testDropout(objLP)$p

LineagePulse documentation built on Nov. 8, 2020, 7:01 p.m.