# NOT RUN {
data(pheno)
data(geno)
data(anno)
gwas <- new('GWASdata', pheno=pheno, geno=geno, anno=anno, desc="some study")
# show method
data(gwas)
gwas
# summary method
data(gwas)
summary(gwas)
# SNPs and genes in pathway
data(gwas)
GeneSNPsize(gwas)
# }
Run the code above in your browser using DataLab