login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A292994
Number of integers m, 1 <= m <= A002569(n), that are not terms in the triangle T(n,k) of A008284.
0
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 4, 6, 8, 12, 19, 26, 39, 52, 71, 92, 120, 161, 205, 258, 320, 398, 499, 613, 754, 911, 1103, 1340, 1622, 1956, 2338, 2789, 3303, 3938, 4690, 5547, 6551, 7690, 9018, 10584, 12425, 14559, 16989, 19790, 22970, 26615
OFFSET
1,13
EXAMPLE
With n = 10, the maximum value of m is 9 and all values of m from 1 to 9 appear within the first 10 rows of A008284, so a(10) = 0.
With n = 13, the maximum value of m is 18 and all values of m from 1 to 18, except 16 and 17, appear within the first 13 rows of A008284, so a(13) = 2.
MATHEMATICA
FoldList[{#1, Count[Range@ Max@ #2, k_ /; FreeQ[#1, k]]} & @@ {Append[#1, #2], #2} & @@ {First@ #1, Table[SeriesCoefficient[1/QPochhammer[a q, q], {q, 0, #2}, {a, 0, k}], {k, #2}]} &, {{{1}}, 0}, Range[2, 40]][[All, -1]] (* Michael De Vlieger, Sep 29 2017, after Vladimir Reshetnikov at A008284 *)
CROSSREFS
Sequence in context: A324939 A057335 A126907 * A379713 A323114 A362231
KEYWORD
nonn
AUTHOR
J. Stauduhar, Sep 28 2017
STATUS
approved