# NOT RUN {
#example object
exObj <- readRDS(system.file("miniObj.RDS", package = "DGEobj"))
# subset to first 10 rows to show reset functionality
exObj <- exObj[c(1:10), ]
exObj <- resetDGEobj(exObj)
dim(exObj)
# }
Run the code above in your browser using DataLab