# NOT RUN {
# Simulate Poisson expression data for 10 genes and 10 cells
gene.expr=matrix(rpois(100, lambda=2), nrow=10)
# Simulate technical variance proportions
tech.var.prop=runif(10)
# Define a collection with two disjoint sets that span the 10 genes
collection=list(set1=1:5, set2=6:10)
# Execute VAM on both sets using default values for center and gamma
vamForCollection(gene.expr=gene.expr, gene.set.collection=collection,
tech.var.prop=tech.var.prop)
# }
Run the code above in your browser using DataLab