Description Usage Arguments Value Author(s) Examples
View source: R/getPermutation.R
This function performs weighted bootstrap on segmentation data to obtain null distribution of estimated AGP.
1 | getPermutation(sam.dat, oo, Np = 100, type = 1, para)
|
sam.dat |
numeric matrix, as returned from |
oo |
Origin Cluster, as returned from |
Np |
integer, number of bootstraps. |
type |
integer, ploidy indicator. 1, diploid; 2, tetraploid; 3, hexaploid |
para |
list, parameters returned from |
A numeric vector containing all the bootstrap AGP values from Np times of resampling.
Bo Li
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)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.