# generate random observation matrix with 5 experiments and 5 genes
obs <- matrix(rnorm(5*5, 1, 0.1), nrow=5, ncol=5)
# define delta to be 1 for each gene
delta <- rep(1, 5)
delta_type <- "perGene"
lambda_values <- calcRangeLambda(obs, delta, delta_type)
Run the code above in your browser using DataLab