#
# Autism genome scan from the AGRE Database: Chromosome 7.
# Geschwind et al.  Am J Hum Genet 2001; 69: 463-466.
# Used as an example of TDT analysis via MENDEL 4.
#
set imp off
set loc first   qua
set loc D7S2201 marker
set loc D7S3047 marker
set loc D7S1802 marker
set loc D7S1808 marker
set loc D7S817  marker
set loc D7S2846 marker
set loc D7S1818 marker
set loc D7S1830 marker
set loc D7S2204 marker
set loc D7S2212 marker
set loc GATA156 marker
set loc D7S821  marker
set loc D7S1799 marker
set loc D7S2847 marker
set loc D7S1804 marker
set loc D7S1824 marker
set loc D7S2195 marker
set loc D7S3058 marker
set loc trait qua
set loc trait2 qua
set loc trait3 qua
set loc trait4 qua
set data ../pedigrees
read ped autism7.ped
set dis 6.5 15.9 8.6 8.6 7.5 11.8 3.2 18.2 4.5 \
        4.6 9.1 4.8 11.2 11.8 13.0 5.2 18.6
run
fre
tab D7S2201
tab D7S3047
sho map
lin
set loc health aff
health=(trait==2)
tab health trait
set tdt both
tdt health
keep health D7S3047
set ple 1
set iter 10000
tdt health
ass health
