data(testData)
normaldata<-pre.process("rma",testData)
## Create design matrix
design<-make.design(pData(normaldata), "group")
## Create contrast matrix - Compare group "A" vs. "C"
contrast<-make.contrast(design, "A", "C")
## Identify differentially expressed gene by using LIMMA method
result<-regress(normaldata, design, contrast, "L")
Run the code above in your browser using DataLab