new("GenomeAnnotatedDataFrame")
if(require("pd.mapping50k.hind240") && require("pd.mapping50k.xba240") && require("SNPchip")){
data(locusLevelData)
gd <- GenomeAnnotatedDataFrameFrom(locusLevelData[["genotypes"]],
annotationPkg=locusLevelData[["platform"]],
genome="hg19")
arm <- getArm(gd, "hg19")
}
Run the code above in your browser using DataLab