OFFSET
0,4
COMMENTS
Up to sign the denominators in the Engel-type expansion given by Peter Bala in A014551.
FORMULA
a(n) = Product_{k=2..n} ((-2)^(k-1)+1).
a(n+1)/a(n) = A014551(n)*(-1)^n, for n > 0.
a(n) = QPochhammer(1/2; -2)_{n+1}, for n > 0, where QPochhammer is the q-analog of the Pochhammer symbol: (a; q)_n.
Sum_{k>=0} (-2)^k/a(k) = -3.
a(n) ~ c * (-2)^(n*(n-1)/2), where c = QPochhammer(1/2, -1/2) = A330863. - Vaclav Kotesovec, Jun 27 2026
MATHEMATICA
Join[{1}, Table[QPochhammer[1/2, -2, n+1], {n, 1, 20}]] (* Vaclav Kotesovec, Jun 27 2026 *)
PROG
(PARI) a(n) = prod(k=2, n, ((-2)^(k-1)+1))
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Thomas Scheuerle, Jun 25 2026
STATUS
approved