A180591 G.f.: A(x) = exp( Sum_{n>=1} 2^[A001511(n)^2]*x^n/n ) where A001511(n) is the exponent in the highest power of 2 that divides 2n.

1, 2, 10, 18, 178, 338, 1450, 2562, 23234, 43906, 186602, 329298, 2276914, 4224530, 16898506, 29572482, 191488770, 353405058, 1394069578, 2434734098, 14073489714, 25712245330, 97969052778, 170225860226, 938475356354

Offset

0,2

Links

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

Example

G.f.: A(x) = 1 + 2*x + 10*x^2 + 18*x^3 + 178*x^4 + 338*x^5 +...
log(A(x)) = 2^1*x + 2^4*x^2/2 + 2^1*x^3/3 + 2^9*x^4/4 + 2^1*x^5/5 + 2^4*x^6/6 + 2^1*x^7/7 + 2^16*x^8/8 +...+ 2^[A001511(n)^2]*x^n/n +...

Prog

(PARI) {a(n)=polcoeff(exp(sum(m=1, n, 2^(valuation(2*m, 2)^2)*x^m/m)+x*O(x^n)), n)}

Crossrefs

Cf. A155200, A001511, A000123.

Sequence in context: A055260 A254059 A346551 * A330083 A322951 A156446

Adjacent sequences: A180588 A180589 A180590 * A180592 A180593 A180594

Keyword

nonn

Author

Paul D. Hanna, Sep 10 2010

Extensions

Name corrected by Paul D. Hanna, Sep 19 2010

Status

approved