data(chromosome17)
# First genomic dependency model from screening chromosomal arm
models <- screen.cgh.mrna(geneExp, geneCopyNum, 10, chr=17, arm='p')
model <- models[[1]]
# Printing information of the model
model
# Latent variable Z
getZ(model, geneExp,geneCopyNum)
# Contributions of samples and variables to model
plot(model,geneExp,geneCopyNum)
Run the code above in your browser using DataLab