#
# (1) simulating expression data: 100 genes, 12 samples
#
# (a) microarray data: intensity measurements
ma.eset <- make.example.data(what="eset", type="ma")
# (b) RNA-seq data: read counts
rseq.eset <- make.example.data(what="eset", type="rseq")
#
# (2) Normalization
#
# (a) microarray ...
norm.eset <- normalize(ma.eset)
# (b) RNA-seq ...
norm.eset <- normalize(rseq.eset)
# ... normalize also for GC content
gc.content <- rnorm(100, 0.5, sd=0.1)
fData(rseq.eset)$gc <- gc.content
norm.eset <- normalize(rseq.eset, within=TRUE)
Run the code above in your browser using DataLab