# NOT RUN {
myDGEobj <- readRDS(system.file("exampleObj.RDS", package = "DGEobj"))
dim(myDGEobj)
# Simple count threshold in at least 3/4ths the samples
myDGEobj <- lowIntFilter(myDGEobj,
countThreshold = 10,
sampleFraction = 0.5)
dim(myDGEobj)
# Count and FPK thresholds
myDGEobj <- lowIntFilter(myDGEobj,
countThreshold = 10,
fpkThreshold = 5,
sampleFraction = 0.5)
dim(myDGEobj)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab