## load example data
data(example.lumi)
## Quality control estimation
lumi.Q <- lumiQ(example.lumi)
## summary
summary(lumi.Q)
## plot the density
plot(lumi.Q, what='density')
## plot the pairwise sample correlation
plot(lumi.Q, what='pair')
## plot the pairwise MAplot
plot(lumi.Q, what='MAplot')
## sample relations
plot(lumi.Q, what='sampleRelation', method='mds', color=c('100US', '95US:5P', '100US', '95US:5P'))
## detect outlier based on the distance to the mean profile
plot(lumi.Q, what='outlier')
## Density plot of coefficient of variance
plot(lumi.Q, what='cv')
Run the code above in your browser using DataLab