
Example 2 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,2(2X,A2))
2000 CONTINUE
C
Simulated data (annotated):
Stdy Fam Ind Fath Moth Sex Trait1 Loc Mrk
ID ID ID ID ID 1 1
HGAR0001.0001 M 0.9109 12 22
HGAR0001.0002 F 0.7074 12 12
HGAR0001.0003 0001 0002 M -0.0294 12 12
HGAR0001.0004 0001 0002 F 0.6419 22 22
HGAR0001.0005 0001 0002 F -0.3908 12 12
HGAR0002.0001 M 0.5491 22 22
HGAR0002.0002 F 0.1806 12 12
HGAR0002.0003 0001 0002 M 0.7712 22 12
HGAR0002.0004 0001 0002 M 1.1020 22 12
HGAR0002.0005 0001 0002 F 2.3403 22 12
HGAR0003.0001 M 1.9709 22 12
HGAR0003.0002 F 0.8311 12 11
HGAR0003.0003 0001 0002 F 1.3048 22 11
HGAR0003.0004 0001 0002 M 0.5363 12 12
HGAR0003.0005 0001 0002 M 0.8880 12 12
.
.
.
HGAR0100.0001 F -0.3998 12 22
HGAR0100.0002 M -0.1357 12 22
HGAR0100.0003 0002 0001 M 0.2602 12 22
HGAR0100.0004 0002 0001 M -1.6299 11 22
HGAR0100.0005 0002 0001 F -1.8823 11 22
|