data(ExomeCount)
ref_counts <- matrix(data = c(ExomeCount$Exome2, ExomeCount$Exome3, ExomeCount$Exome4),
ncol = 3, byrow = FALSE)
colnames(ref_counts) <- c("Ex1", "Ex2", "Ex3")
select.reference.set(test.counts = ExomeCount$Exome1[1:200],
reference.counts = ref_counts[1:200,])
Run the code above in your browser using DataLab