## Not run:
# signalFile <- "./extData/Signal/toySignal.txt"
# snpInfoDir <- "./extData/snpInfo/"
# writeLD(pattern = "Chrom", snpInfoDir, signalFile,
# ldThresh = 0.8, mc.cores = detectCores())
## End (Not run)Run the code above in your browser using DataLab