# LOADING DATA
data(sw)
# OPTIMISED INTENSITY-DEPENDENT NORMALISATION
norm.oin <- oin(sw)
# MA-PLOT OF NORMALISATION RESULTS OF FIRST ARRAY
plot(maA(norm.oin)[,1],maM(norm.oin)[,1],main="OIN")
# CORRESPONDING MXY-PLOT
mxy.plot(maM(norm.oin)[,1],Ngc=maNgc(norm.oin),Ngr=maNgr(norm.oin),
Nsc=maNsc(norm.oin),Nsr=maNsr(norm.oin),main="OIN")
#
Run the code above in your browser using DataLab