Nothing
import.data<-function(phenotype.file, path=getwd(), ...){
phenoD<-read.AnnotatedDataFrame(phenotype.file, path=path, ...)
raw<-ReadAffy(filenames=rownames(pData(phenoD)), phenoData=phenoD, celfile.path=path)
raw
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.