View source: R/fitDVboostmodel.R
fitDVboostmodel | R Documentation |
Internal function called by runDVboostwrapper
fitDVboostmodel(input.mtx, is.known.variant, fitting.verbose = FALSE, min.N.known.var = 50)
input.mtx |
annotated SVs loaded and formatted via |
is.known.variant |
numeric vector of 0/1 in the same order as |
fitting.verbose |
logical value, if TRUE, it will print out progress and performance indicators. Default to FALSE |
min.N.known.var |
minimum number of known SVs needed to build training model. Default to 50 |
DV.res which is essentially a gbm.object
with several additional fields:
fitted.values: converted to probability based on fit
field
ID: supplied IDs for SVs
is.known.variant: 0/1 indicating whether the SV is known(1) or novel(0)
DVboost.Q.score: Q scores for SVs
runDVboostwrapper
data(ExampleData, package='DVboost') sample <- 'NA12878' outdir <- getwd() tmp.mtx.DEL <- ExampleData[ExampleData$SVType == 'DEL',] truth.vec <- tmp.mtx.DEL$CNVMAP == 1 | tmp.mtx.DEL$CNVR ==1 is.semi.truth.vec <- as.numeric(truth.vec) DV.fit.res1 <- fitDVboostmodel(input.mtx=tmp.mtx.DEL, is.known.variant = is.semi.truth.vec)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.