Home Forums Actuarial Resources & Blogs 4 types of calculations involving ahnentafel position numbers, by computer

Viewing 1 post (of 1 total)
• Author
Posts
• #25214
Richard Purvey
Participant

Four types of calculation involving ahnentafel position numbers and how to do them by computer

First type

How to calculate the number of generations ahnentafel position number X is back from ahnentafel position number 1, using a spreadsheet

For example, the number of generations ahnentafel position number 9 is back from ahnentafel position number 1 is 3 generations.

Put the appropriate headings into cells A1 and B1 and then put ahnentafel position number X into cell A2, and into cell B2, put the formula =INT(LN(A2)/LN(2))

Second type

The computer program below will calculate the number of generations ahnentafel position number X is back from ahnentafel position number 1 AND state the parental sequence for ahnentafel position number X in terms of ahnentafel position number 1

For example, the number of generations ahnentafel position number 9 is back from ahnentafel position number 1 is 3 generations and the parental sequence for ahnentafel position number 9 in terms of ahnentafel position number 1 is father’s father’s mother (the program will state this as FATH FATH MOTH).

10 INPUT X

20 A=INT(LN(X)/LN(2))

30 PRINT A

40 IF X=1 THEN END

50 B=0

60 DIM NUM\$(A)

70 IF X=1 THEN GOTO 120

80 B=B+1

90 IF X/2=INT(X/2) THEN NUM\$(A+1-B)=”FATH” ELSE NUM\$(A+1-B)=”MOTH”

100 X=INT(X/2)

110 GOTO 70

120 FOR X=1 TO A

130 PRINT NUM\$(X)

140 NEXT X

Third type

The computer program below will calculate and display the descendant ahnentafel position numbers for ahnentafel position number X

For example, the descendant ahnentafel position numbers for ahnentafel position number 9 are 4, 2 and 1.

10 INPUT X

20 IF X=1 THEN END

30 X=INT(X/2)

40 PRINT X

50 GOTO 20

Fourth type

The computer program below will calculate and display the ancestral ahnentafel position numbers for ahnentafel position number X, doing this for each generation back from ahnentafel position number X, as far back as G generations back from ahnentafel position number X

For example, the ancestral ahnentafel position numbers for ahnentafel position number 9, for each generation back from ahnentafel position number 9, as far back as 2 generations back from ahnentafel position number 9 are 18 and 19 followed by 36, 37, 38 and 39.

10 INPUT X, G

20 IF G=0 THEN END

30 FOR Y=1 TO G

40 FOR Z=0 TO 2^Y-1

50 PRINT 2^Y*X+Z

60 NEXT Z

70 PRINT “ “

80 NEXT Y

Richard Purvey June 2024

Viewing 1 post (of 1 total)
• You must be logged in to reply to this topic.