OFFSET
0,4
COMMENTS
Inverse Euler transform of A077925 shifted by two places: 1, 0, 1, -1, 3, -5,... [From R. J. Mathar, Jul 26 2010]
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..3000
G. Niklasch, Some number theoretical constants: 1000-digit values [Cached copy]
FORMULA
a(n) ~ -(-1)^n * 2^(n+1) / n. - Vaclav Kotesovec, Jun 13 2020
MATHEMATICA
nmax = 40; s = {}; For[j = 1, j <= nmax, j++, AppendTo[s, j*(1 - (-2)^(j - 1))/3 - Sum[s[[d]]*(1 - (-2)^(j - d - 1))/3, {d, j - 1}]]]; Table[Sum[If[Divisible[j, d], MoebiusMu[j/d], 0]*s[[d]], {d, 1, j}]/j, {j, nmax}] (* Vaclav Kotesovec, Jun 13 2020 *)
CROSSREFS
KEYWORD
sign
AUTHOR
N. J. A. Sloane, Nov 19 2001
EXTENSIONS
More terms from R. J. Mathar, Jul 26 2010
STATUS
approved