login
A158360
a(n) = A145511(n) - A145501(n).
3
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,2
LINKS
PROG
(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
CROSSREFS
KEYWORD
sign
AUTHOR
Paul Curtz, Mar 17 2009
EXTENSIONS
Edited and extended by R. J. Mathar, Apr 08 2009
STATUS
approved