Create HuGene Annotation with pdInfoBuilder

CreateHuGeneAnnot.R

library(pdInfoBuilder)
seed <- new("AffySTPDInfoPkgSeed",
            version="3.6.0",
            license="Artistic-2.0",
            pgfFile=dir(patt=".pgf$"),
            clfFile=dir(patt=".clf$"),
            probeFile=dir(patt="probeset.csv$"),
            transFile=dir(patt="transcript.csv$"),
            coreMps=dir(patt="core.mps$"),
            fullMps=dir(patt="full.mps$"),
            extendedMps=dir(patt="extended.mps$"),
            geneArray=TRUE,
            author="Benilton Carvalho",
            email="Benilton.Carvalho@cancer.org.uk",
            biocViews="AnnotationData",
            genomebuild="HG19",
            organism="Human",
            species="Homo Sapiens",
            url="http://about.me/benilton")
makePdInfoPackage(seed, destDir=".")