A158360 a(n) = A145511(n) - A145501(n).

0, -2, 0, 0, 0, -6, 0, 6, 0, -6, 0, 0, 0, -6, 0, 12, 0, -12, 0, 0, 0, -6, 0, 18, 0, -6, 0, 0, 0, -18, 0, 18, 0, -6, 0, 0, 0, -6, 0, 18, 0, -18, 0, 0, 0, -6, 0, 36, 0, -12, 0, 0, 0, -20, 0, 18, 0, -6, 0, 0, 0, -6, 0, 24, 0, -18, 0, 0, 0, -18, 0, 36, 0, -6, 0, 0, 0, -18, 0, 36, 0, -6, 0, 0, 0, -6, 0

Offset: 1

Author

Paul Curtz, Mar 17 2009

Keywords

• sign

Links

• Antti Karttunen, Table of n, a(n) for n = 1..65537

Crossrefs

Cf. A145444, A145501, A145511, A158327, A158801.

Programs

PARI

up_to = 65537;
t1 = direuler(p=2, up_to, 1/(1-X)^3);
t2 = direuler(p=2, 2, 1+1*X^2+4*X^4, up_to);
t3 = direuler(p=2, 2, 1-2*X^1+7*X^2, up_to);
v145501 = dirmul(t1, t2);
v145511 = dirmul(t1, t3);
A158360(n) = (v145511[n] - v145501[n]); \\ (after code in A145501 and A145511) - Antti Karttunen, Sep 27 2018

Extensions

Edited and extended by R. J. Mathar, Apr 08 2009