bootstrapCancerGenomes: Bootstrap Cancer Genomes

Usage Arguments Examples

Usage

1

Arguments

genomes

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (genomes) 
{
    genome.col.sums <- apply(genomes, 2, sum)
    norm.genomes <- genomes/matrix(genome.col.sums, ncol = ncol(genomes), 
        nrow = nrow(genomes), byrow = TRUE)
    bootstrapGenomes <- sapply(1:length(genome.col.sums), (function(i) {
        stats::rmultinom(1, size = genome.col.sums[i], prob = norm.genomes[, 
            i])
    }))
    return(bootstrapGenomes)
  }

dami82/mutSignatures_dev documentation built on May 17, 2019, 7:02 p.m.