OFFSET
1,1
LINKS
Peter J. C. Moses, Table of n, a(n) for n = 1..10000
EXAMPLE
1/1; -->
1/1 1/1; -->
1/1 1/3 1/1; -->
1/1 4/3 4/3 1/1; --> 4
1/1 7/3 8/3 7/3 1/1; --> 8
1/1 10/3 5/1 5/1 10/3 1/1; --> ...
1/1 13/3 25/3 10/1 25/3 13/3 1/1;
1/1 16/3 38/3 55/3 55/3 38/3 16/3 1/1; ...
MATHEMATICA
thirdPascal[1]={1}; thirdPascal[2]={1, 1}; thirdPascal[3]={1, 1/3, 1}; thirdPascal[n_] := thirdPascal[n] = Join[{1}, Map[Total, Partition[thirdPascal[n-1], 2, 1]], {1}]; DeleteDuplicates[Flatten[Table[Select[Numerator[thirdPascal[n]], EvenQ], {n, 20}]]]
CROSSREFS
KEYWORD
AUTHOR
EXTENSIONS
Terms a(12) and beyond from b-file by Andrew Howroyd, Feb 05 2018
STATUS
approved