#Example script to import GenePix data (for Lowe Lab Pae printA arrays)



library(marrayTools)

importGPR<-function(gal, details){

  g.info<-read.marrayInfo(fname=gal, info.id=4:5, labels=5, skip=21)

  a.info<-read.marrayInfo(fname=details)

  grid<-read.marrayLayout(fname=gal, ngr=4, ngc=4, nsr=23, nsc=24, pl.col=2, ctl.col=4, skip=21)

  data<-read.GenePix(layout=grid, targets=a.info, gnames=g.info)

  return(data)

} 

data.raw<-importGPR("Pae-printA.gal","Paedetails.txt")