para=getPara()
## Not run:
# data(A0SD.BAF)
# data(A0SD.LRR)
# chr8.baf=A0SD.BAF[A0SD.BAF[,2]==8,]
# chr8.lrr=A0SD.LRR[A0SD.LRR[,2]==8,]
# x=getSegChr(chr8.baf,chr8.lrr)
# getKmeans(x,para=para)
# ## End(Not run)
Run the code above in your browser using DataLab