> R> library(affy)
> R> Data <- ReadAffy( )
> R> eset <- rma(Data)
> R> write.exprs(eset, file="mydata.txt")
You could call it all in one line:
library(affy);data <- ReadAffy() ...
Or you could put it in a function:
foo <- function() {
library(affy)
Data <- readAffy()
...
}
-J