# NOT RUN {
# example DGEobj
exObj <- readRDS(system.file("exampleObj.RDS", package = "DGEobj"))
# Assign attribute to a DGEobj
exObj <- setAttribute(exObj, "RNA-SEQ", "Platform")
# Set attributes on an item inside a DGEobj
exObj[["counts"]] <- setAttribute(exObj[["counts"]], FALSE, "normalized")
# }
Run the code above in your browser using DataLab