Null distribution for estimated AGP.

Share:

Description

This function performs weighted bootstrap on segmentation data to obtain null distribution of estimated AGP.

Usage

1
getPermutation(sam.dat, oo, Np = 100, type = 1, para)

Arguments

sam.dat

numeric matrix, as returned from getSeg() or getSegChr()

oo

Origin Cluster, as returned from getOrigin()

Np

integer, number of bootstraps.

type

integer, ploidy indicator. 1, diploid; 2, tetraploid; 3, hexaploid

para

list, parameters returned from getPara()

Value

A numeric vector containing all the bootstrap AGP values from Np times of resampling.

Author(s)

Bo Li

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
## Slow. Run with caution.

data(A0SD.BAF)
data(A0SD.LRR)
seg.dat=c()
for(CHR in c(8,9,10)){
	baf=A0SD.BAF[A0SD.BAF[,2]==CHR,]
	lrr=A0SD.LRR[A0SD.LRR[,2]==CHR,]
	x=getSegChr(baf,lrr)
	seg.dat=rbind(seg.dat,x)
}
dd.dat=seg.dat[,2:8]
rownames(dd.dat)=seg.dat[,1]
mode(dd.dat)='numeric'
para=getPara()
oo=getOrigin(dd.dat,para=para)
p.null=getPermutation(dd.dat,oo,para=para)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.