# NOT RUN {
tar.snp <- c(21, 118, 121, 140, 155, 168, 218, 383)
m.file <- file.path(system.file(package = "TriadSim"),'extdata/pop1_4chr_mom')
f.file <- file.path(system.file(package = "TriadSim"),'extdata/pop1_4chr_dad')
k.file <- file.path(system.file(package = "TriadSim"),'extdata/pop1_4chr_kid')
# the preloaded data frame snp.all2 contains the data frame read from the corresponding .bim file.
# }
# NOT RUN {
target.geno <- get.target.geno(c(m.file,f.file,k.file), tar.snp,snp.all2)
# }
Run the code above in your browser using DataLab