
Example 5 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),TRAIT(2,K),
$ (GENTYP(I,K),I=1,NUMLOC)
9010 FORMAT (A4,A4,'.',A4,2(1X,A4),1X,A1,2(2X,F8.4),4(2X,A2))
2000 CONTINUE
C
Simulated data (annotated):
Stdy Fam Ind Fath Moth Sex Trait1 Trait2 Loc Mrk Loc Mrk
ID ID ID ID ID 1 1 2 2
HGAR0001.0001 M -1.9089 -0.5230 11 aa 12 22
HGAR0001.0002 F 2.0260 0.7520 22 ab 22 22
HGAR0001.0003 0001 0002 M 0.0665 0.2720 12 aa 22 22
HGAR0001.0004 0001 0002 M -0.3429 0.6231 12 ab 22 22
HGAR0001.0005 0001 0002 M -0.7198 1.1154 12 ab 22 22
HGAR0002.0001 F 0.0828 -0.2218 12 ab 12 22
HGAR0002.0002 M 0.8040 -1.3143 12 aa 11 22
HGAR0002.0003 0002 0001 M -1.2853 -1.4392 11 aa 11 22
HGAR0002.0004 0002 0001 F -0.5099 -0.2010 11 aa 12 22
HGAR0002.0005 0002 0001 M -1.3242 -1.1832 11 aa 11 22
HGAR0003.0001 F 1.5775 -0.3355 22 aa 12 22
HGAR0003.0002 M 0.7117 -0.2974 22 bb 12 22
HGAR0003.0003 0002 0001 M 0.9406 -0.0072 22 ab 12 22
HGAR0003.0004 0002 0001 M 0.5145 -0.3021 22 ab 12 22
HGAR0003.0005 0002 0001 F 0.1743 -1.7199 22 ab 11 22
.
.
.
HGAR0100.0001 M -0.6415 -0.0935 11 ab 12 22
HGAR0100.0002 F -1.3604 0.3362 11 aa 12 22
HGAR0100.0003 0001 0002 F -0.8261 1.2460 11 ab 22 22
HGAR0100.0004 0001 0002 M -0.2311 0.3982 11 ab 12 22
HGAR0100.0005 0001 0002 F -1.8120 -1.6442 11 aa 11 22
|