## Not run:
# ## define paths
# scmdir <- "/common/path/schemes"
# libdir <- "/my/path/Affy/libraryfiles"
# anndir <- "/my/path/Affy/Annotation"
#
# ## create scheme for HuEx-1_0-st-v2.r2 Exon array
# scheme.huex10stv2r2.na32 <- import.exon.scheme("Scheme_HuEx10stv2r2_na32", filedir=scmdir,
# layoutfile=file.path(libdir, "HuEx-1_0-st-v2_libraryfile", "HuEx-1_0-st-r2/HuEx-1_0-st-v2.r2.clf"),
# schemefile=file.path(libdir, "HuEx-1_0-st-v2_libraryfile", "HuEx-1_0-st-r2/HuEx-1_0-st-v2.r2.pgf"),
# probeset=file.path(anndir, "HuEx-1_0-st-v2.na32.hg19.probeset.csv"),
# transcript=file.path(anndir, "HuEx-1_0-st-v2.na32.hg19.transcript.csv"))
#
# ## access ROOT scheme file from new R session
# scheme.exon <- root.scheme(paste(scmdir,"Scheme_HuEx10stv2r2_na32.root",sep="/"))
#
#
# ## create scheme for HuGene-1_0-st-v1.r4 as exon array
# scheme.hugene10stv1r4.na32 <- import.exon.scheme("Scheme_HuGene10stv1r4_na32",filedir=scmdir,
# layoutfile=file.path(libdir, "HuGene-1_0-st-v1.r4.analysis-lib-files", "HuGene-1_0-st-v1.r4.clf"),
# schemefile=file.path(libdir, "HuGene-1_0-st-v1.r4.analysis-lib-files", "HuGene-1_0-st-v1.r4.pgf"),
# probeset=file.path(anndir, "HuGene-1_0-st-v1.na32.hg19.probeset.csv"),
# transcript=file.path(anndir, "HuGene-1_0-st-v1.na32.hg19.transcript.csv"))
#
# ## access ROOT scheme file from new R session
# scheme.gene <- root.scheme(file.path(scmdir, "Scheme_HuGene10stv1r4_na32.root"))
#
#
# ## create scheme for HuEx-1_0-st-v2.r2 Exon array with the old annotation file
# scheme.huex10stv2r2.old <- import.exon.scheme("Scheme_HuEx10stv2r2_old",filedir=scmdir,
# layoutfile=file.path(libdir, "HuEx-1_0-st-v2_libraryfile", "HuEx-1_0-st-r2", "HuEx-1_0-st-v2.r2.clf"),
# schemefile=file.path(libdir, "HuEx-1_0-st-v2_libraryfile", "HuEx-1_0-st-r2", "HuEx-1_0-st-v2.r2.pgf"),
# probeset=file.path(anndir, "HuEx-1_0-st-probeset-annot.csv"),
# transcript=file.path(anndir, "HuEx-1_0-st-transcript-annot.csv"),
# control=file.path(libdir, "HuEx-1_0-st-v2_libraryfile", "HuEx-1_0-st-r2", "HuEx-1_0-st-v2.r2.controls.ps"))
# ## End(Not run)
Run the code above in your browser using DataLab