A309679 G.f. A(x) satisfies: A(x) = A(x^5) / (1 - x)^2.

1, 2, 3, 4, 5, 8, 11, 14, 17, 20, 26, 32, 38, 44, 50, 60, 70, 80, 90, 100, 115, 130, 145, 160, 175, 198, 221, 244, 267, 290, 324, 358, 392, 426, 460, 508, 556, 604, 652, 700, 765, 830, 895, 960, 1025, 1110, 1195, 1280, 1365, 1450, 1561, 1672, 1783, 1894, 2005, 2148, 2291, 2434, 2577

Offset

0,2

Links

Table of n, a(n) for n=0..58.

Formula

G.f.: Product_{k>=0} 1/(1 - x^(5^k))^2.

Mathematica

nmax = 58; A[_] = 1; Do[A[x_] = A[x^5]/(1 - x)^2 + O[x]^(nmax + 1) // Normal, nmax + 1]; CoefficientList[A[x], x]
nmax = 58; CoefficientList[Series[Product[1/(1 - x^(5^k))^2, {k, 0, Floor[Log[5, nmax]] + 1}], {x, 0, nmax}], x]

Crossrefs

Cf. A005706, A171238, A309677, A309678.

Sequence in context: A008812 A343608 A144679 * A207890 A008825 A261629

Adjacent sequences: A309676 A309677 A309678 * A309680 A309681 A309682

Keyword

nonn

Author

Ilya Gutkovskiy, Aug 12 2019

Status

approved