rindex <- 1:10
names (rindex) <- paste ("gene", rindex, sep = "")
rindex
annot <- list (paste ("gene", 1:2, sep = ""), ##too small block
paste ("gene", 1:6, sep = ""), ##right size
paste ("gene", 1:5, sep = ""), ##too big block
paste ("gene", c(1:3, 1:3), sep = "")) ##duplicated IDs
annot[[2]][1] <- NA
annot[[2]][2] <- ""
annot[[2]][3] <- "BAD_ID"
annot
annotFilter (annot, minBlockSize = 3, maxBlockSize = 5)
annotFilter (annot, rindex, minBlockSize = 3, maxBlockSize = 5)
Run the code above in your browser using DataLab