A158801 a(n) = A145444(n) - A145501(n).

0, 0, 0, 2, 0, 0, 0, 8, 0, 0, 0, 6, 0, 0, 0, 14, 0, 0, 0, 6, 0, 0, 0, 24, 0, 0, 0, 6, 0, 0, 0, 20, 0, 0, 0, 12, 0, 0, 0, 24, 0, 0, 0, 6, 0, 0, 0, 42, 0, 0, 0, 6, 0, 0, 0, 24, 0, 0, 0, 18, 0, 0, 0, 26, 0, 0, 0, 6, 0, 0, 0, 48, 0, 0, 0, 6, 0, 0, 0, 42, 0, 0, 0, 18, 0, 0, 0, 24, 0, 0, 0, 6, 0, 0, 0, 60, 0, 0, 0

Offset: 1

Author

Paul Curtz, Mar 27 2009

Keywords

• nonn

Links

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

Crossrefs

See A145444, A145501, A145511, A158334.

Programs

PARI

up_to = 1001;
t1=direuler(p=2, up_to, 1/(1-X)^3);
t2=direuler(p=2, 2, 1+3*X^2+2*X^3, up_to);
t3=dirmul(t1, t2); \\ For A145444
u1=direuler(p=2, up_to, 1/(1-X)^3);
u2=direuler(p=2, 2, 1+1*X^2+4*X^4, up_to);
u3=dirmul(u1, u2); \\ For A145501
A158801(n) = (t3[n]-u3[n]); \\ Antti Karttunen, Jul 21 2018

Extensions

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