## Not run:
# # (Almost) all standard haplin runs can be done with haplinSlide.
# # Below is an illustration. See the haplin help page for more
# # examples.
# #
# # Analyzing the effect of fetal genes, including triads with missing data,
# # using a multiplicative response model. When winlength = 1, separate
# # markers are used. To make longer windows, winlength can be increased
# # correspondingly:
# result.1 <- haplinSlide("C:/work/data.dat", use.missing = T, response = "mult",
# reference = "ref.cat", winlength = 1, table.output = F)
# # Provide summary of separate results:
# lapply(result.1, summary)
# # Plot results:
# par(ask = T)
# lapply(result.1, plot)
# # Compute an overall p-value for the scan, corrected for multiple testing
# # and dependencies between windows:
# suest(result.1)
#
# ## End(Not run)
Run the code above in your browser using DataLab