# Load the simulated data.
data(trio.data)
# All SNPs in prob.mat.test can be tested by
prob.tdt.out <- probTDT(prob.mat.test)
# By default, an additive mode of inheritance is considered.
# If another mode, e.g., the dominant mode, should be
# considered, then this can be done by
prob.tdt.out2 <- probTDT(prob.mat.test, model = "dominant")
# By default, statistics for the top 5 SNPs are displayed.
# If another number of SNPs, say 10, should be displayed,
# then this can be done by
print(prob.tdt.out2, top = 10)
# The statistics for all SNPs (not ordered by their
# significance) can be obtained by
print(prob.tdt.out2, top = 0)
Run the code above in your browser using DataLab