OFFSET
0,4
LINKS
FORMULA
a(n) = Product_{k=1..n} ((-2)^k - 1) / (-2 - 1).
a(1) = 1, a(n) = (((-2)^n - 1) * a(n-1))/(-3). - Vincenzo Librandi, Oct 26 2012
a(n) = (-1)^(floor((n mod 4)/2)) * Product_{k=1..n} A001045(k). - Altug Alkan, Apr 05 2016
a(n) ~ (-1)^floor(n/2) * c * 2^(n*(n+1)/2) / 3^n, where c = Product_{k>=1} (1 - 1/(-2)^k) = 1.21072413030105918013... (A330862). - Amiram Eldar, Aug 09 2025
MATHEMATICA
RecurrenceTable[{a[1]==1, a[n]==(((-2)^n - 1) * a[n-1])/(-3)}, a, {n, 15}]
Table[QFactorial[n, -2], {n, 20}] (* Vladimir Reshetnikov, Sep 16 2016 *)
PROG
(Magma) I:=[1]; [n le 1 select I[n] else (((-2)^n - 1) * Self(n-1))/(-3): n in [1..18]]; // Vincenzo Librandi, Oct 26 2012
(PARI) a(n) = prod(k=1, n, ((-2)^k-1)/(-3)) \\ Michel Marcus, Apr 05 2016
CROSSREFS
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
a(0)=1 prepended by Seiichi Manyama, May 30 2025
STATUS
approved
