OFFSET
1,2
FORMULA
E.g.f.: Sum_{k>=1} mu(k) * log(cos(x^k)) / k (even powers only).
MATHEMATICA
nmax = 32; Take[CoefficientList[Series[Sum[MoebiusMu[k] Log[Cos[x^k]]/k, {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!, {1, -1, 2}] // Rest
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, May 16 2022
STATUS
approved