Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A220513
a(n) = spt(13n+6)/13 where spt(n) = A092269(n).
3
2, 140, 3042, 38054, 344212, 2488260, 15235620, 81926240, 396603536, 1759312286, 7246532360, 27998586490, 102294344881, 355704104008, 1183463874068, 3784162891544, 11672177600660, 34840196162760, 100912078549712, 284295561826160
OFFSET
0,1
COMMENTS
That spt(13n+6) == 0 (mod 13) is one of the congruences stated by George E. Andrews. See theorem 2 in the Andrews' paper. See also A220505 and A220507.
FORMULA
a(n) = A092269(A186113(n))/13 = A220503(n)/13.
MATHEMATICA
b[n_, i_] := b[n, i] = If[n==0 || i==1, n, {q, r} = QuotientRemainder[n, i]; If[r == 0, q, 0] + Sum[b[n - i*j, i - 1], {j, 0, n/i}]];
spt[n_] := b[n, n];
a[n_] := spt[13 n + 6]/13;
Table[a[n], {n, 0, 19}] (* Jean-François Alcover, Jan 30 2019, after Alois P. Heinz in A092269 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Jan 18 2013
STATUS
approved