[R] Help with Affymetrix data

[kvyas]

I have made some progress.

Change dir(to where CEL files are saved)
Data <- ReadAffy()
eset <- rma(Data)
my.pm.data <- pm(Data)
write.table (my.pm.data, file = "pmprobes3.csv", sep = ",", col.names = TRUE, 
row.names = probeNames(Data))

This results in the following:

Probe	Sam1	Sam2	Sam3	Sam4
1415670_at01	340	383	376	320
1415670_at02	794	932	734	697
1415670_at03	1117	1366	1013	932
1415670_at04	97	97	148	94
1415670_at05	387	405	367	402
1415670_at06	485	553	391	343
1415670_at07	458	509	410	385
1415670_at08	507	684	616	545
1415670_at09	311	392	576	463
1415670_at10	691	822	688	588
1415670_at11	512	726	3201	2317
1415671_at01	1230	1212	873	770
1415671_at02	886	877	794	729
1415671_at03	1472	1682	1263	1152
1415671_at04	1171	1214	948	914
1415671_at05	390	479	435	396
1415671_at06	462	513	423	389
1415671_at07	987	1151	1102	815
1415671_at08	992	1066	1203	1013
1415671_at09	489	534	501	385
1415671_at10	401	509	379	293
1415671_at11	1443	1686	1410	1215


How can I get the p-value for each probe?



>===== Original Message From Frank Duan <fhduan at gmail.com> =====
>use PM function in Affy package.
>
>Frank
>
>
>On Mon, 4 Oct 2004 16:48:12 -0400, kvyas <kvyas at utk.edu> wrote:
>> I have CEL files from Affymetrix Mouse Array 430_2 and am trying to get the
>> the individual PM intensities (11 per gene) for each sample. I would like 
to
>> write out this into a tab delimited text file. Where am I stalling? This is
>> what I've done:
>>
>> Change dir(to where CEL files are saved)
>> Data <- ReadAffy()
>> eset <- rma(Data)
>> write.exprs(eset, file="mydata.txt")
>>
>> With this I am only able to get the average intensities per gene not the
>> intensity per probe of each gene.
>>
>> Please help me out.
>>
>> Kanan
>>
>> ______________________________________________
>> R-help at stat.math.ethz.ch mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide! 
http://www.R-project.org/posting-guide.html
>>