A358504
Number of genetic relatives of a person M in a genealogical tree extending back n generations and where everyone has 3 children down to the generation of M.
Original entry on oeis.org
1, 5, 25, 137, 793, 4697, 28057, 168089, 1008025, 6047129, 36280729, 217680281, 1306073497, 7836424601, 47018514841, 282111023513, 1692666010009, 10155995797913, 60935974263193, 365615844530585, 2193695065086361, 13162170386323865, 78973022309554585
Offset: 0
For n=2, the tree comprises a(2) = 25 people,
G-------G G-------G G = 4 grandparents
/ | \ / | \ P = 2 parents
U U P---P U U S = 2 siblings
/|\ /|\ /|\ /|\ /|\ U = 4 uncles (or aunts)
C C C C C C S M S C C C C C C C = 12 cousins
The spouses of U are not shown and are not genetic relatives of M.
-
A358504[n_] := 2^n + 3*(6^n-1)/5; Array[A358504, 25, 0] (* or *)
LinearRecurrence[{9, -20, 12}, {1, 5, 25}, 25] (* Paolo Xausa, Feb 09 2024 *)
-
a(n) = (3^(n+1)+5)<Kevin Ryde, Nov 23 2022
-
for n in range(0,23): print(2**n+3*(6**n-1)//5)
A358601
Number of genetic relatives of a person M in a genealogical tree extending back n generations and where everyone has 7 children down to the generation of M.
Original entry on oeis.org
1, 9, 109, 1485, 20701, 289629, 4054429, 56761245, 794655901, 11125179549, 155752507549, 2180535093405, 30527491283101, 427384877914269, 5983388290701469, 83767436069623965, 1172744104974342301, 16418417469640005789, 229857844574958508189
Offset: 0
-
A358601[n_] := 2^n + 7*(14^n-1)/13; Array[A358601, 25, 0] (* or *)
LinearRecurrence[{17, -44, 28}, {1, 9, 109}, 25] (* Paolo Xausa, Feb 09 2024 *)
-
print([2**n+7*(14**n-1)//13 for n in range(10)])
A358599
Number of genetic relatives of a person M in a genealogical tree extending back n generations and where everyone has 5 children down to the generation of M.
Original entry on oeis.org
1, 7, 59, 563, 5571, 55587, 555619, 5555683, 55555811, 555556067, 5555556579, 55555557603, 555555559651, 5555555563747, 55555555571939, 555555555588323, 5555555555621091, 55555555555686627, 555555555555817699, 5555555555556079843, 55555555555556604131
Offset: 0
-
LinearRecurrence[{13, -32, 20}, {1, 7, 59}, 21] (* Hugo Pfoertner, Dec 05 2022 *)
-
print([2**n+5*(10**n-1)//9 for n in range(10)])
A358600
Number of genetic relatives of a person M in a genealogical tree extending back n generations and where everyone has 6 children down to the generation of M.
Original entry on oeis.org
1, 8, 82, 950, 11326, 135758, 1628782, 19544750, 234535726, 2814426158, 33773108782, 405277295150, 4863327521326, 58359930214958, 700319162497582, 8403829949807150, 100845959397358126, 1210151512767642158, 14521818153210395182, 174261817838522120750
Offset: 0
-
LinearRecurrence[{15, -38, 24}, {1, 8, 82}, 20] (* Hugo Pfoertner, Dec 05 2022 *)
-
print([2**n+6*(12**n-1)//11 for n in range(10)])
Showing 1-4 of 4 results.
Comments