[BioC] convert a Binary CEL file to txt

[Mohammad Esad-Djou]

Hello, 

I would like to convert a Binary CEL file to txt file, which has same strunktur as version 3 in HG_U133 CEL files (charachter File).  

The result muss a table with "probe set name", "probe number", "intensity" and "mean". 

I read with ReadAffy CEL file:
data.raw <- ReadAffy(filenames="H:/Profile/Eigene Dateien/Dip_bak/Pr_sprach/R/ME_cel/SZ_K1_230305.CEL")

after this I try the table produce:

data.exprs <- exprs(data.raw)
data.out <- cbind(data.exprs, 0)
write.table(data.out, file="./R/ME_data/SZ_K1_230305.TXT", sep="\t", col.names=NA, quote=FALSE)

but I cannot to defined correctly entire table as unten:

[INTENSITY]
NumberCells=506944
CellHeader=X	Y	MEAN	STDV	NPIXELS
  0	  0	90.0	15.8	 25
  1	  0	5241.0	899.8	 25

What can I do?

Thnaks,
Mohammad