
Example 4 Data Output
Relevant portion of the driver used to format the output:
C
C WRITE THE SAMPLE INTO A FILE
C
DO 2000, K = 1, P
IF (INCLUD(K)) WRITE (OUTPT2,9010) STDCDE(K),AFNUM(K),
$ AID(K),AFATHR(K),
$ AMOTHR(K),SEX(K),TRAIT(1,K),
$ (GENTYP(I,K),I=1,NUMLOC)
9010 FORMAT (A4,A4,'.',A4,2(1X,A4),1X,A1,2X,F8.4,4(2X,A2))
2000 CONTINUE
C
Simulated data (annotated):
Stdy Fam Ind Fath Moth Sex Trait1 Loc Mrk Loc Mrk
ID ID ID ID ID 1 1 2 2
HGAR0001.0001 M -1.2911 11 bb 12 22
HGAR0001.0002 F -2.2117 11 ab 12 22
HGAR0001.0003 0001 0002 M -0.2870 11 ab 12 22
HGAR0001.0004 0001 0002 M -0.6103 11 bb 12 22
HGAR0001.0005 0001 0002 M -1.1386 11 bb 12 22
HGAR0002.0001 M -0.4451 12 bb 12 22
HGAR0002.0002 F 0.8140 22 ab 12 22
HGAR0002.0003 0001 0002 F -0.6141 12 bb 12 22
HGAR0002.0004 0001 0002 F 0.1989 22 bb 12 22
HGAR0002.0005 0001 0002 M -0.0604 22 bb 12 22
HGAR0003.0001 F -0.8877 12 bb 12 22
HGAR0003.0002 M -1.1635 12 bb 12 11
HGAR0003.0003 0002 0001 M 1.1905 22 bb 22 12
HGAR0003.0004 0002 0001 F -1.5703 12 bb 11 12
HGAR0003.0005 0002 0001 F 1.0065 22 bb 22 12
.
.
.
HGAR0100.0001 M 0.6577 12 ab 12 12
HGAR0100.0002 F -0.3348 11 ab 12 12
HGAR0100.0003 0001 0002 F -1.3494 12 aa 12 12
HGAR0100.0004 0001 0002 F -1.1099 11 ab 22 22
HGAR0100.0005 0001 0002 M -0.4406 11 ab 12 11
|