# NOT RUN {
##Example : case-control study data
data(data.pige)
data(data.pathway)
path.in <- paste(system.file("sampleData", package="PIGE"),"/",sep="")
file <- "SNP-GENE-annotation.txt"
list.gene.snp <- data.to.list.gene.snp(file,path=path.in)
##Example Survival data
data("data.surv")
data("data.pathway.surv")
path.in <- paste(system.file("sampleData", package="PIGE"),"/",sep="")
file="snp.gene.surv.txt"
list.gene.snp.surv <- data.to.list.gene.snp(file,path=path.in)
# }
Run the code above in your browser using DataLab