OFFSET
0,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..64
FORMULA
a(n) ~ c * 3^(n*(n+1)/2), where c = A132323 = QPochhammer[-1, 1/3] = 3.12986803713402307587769821345767...
MATHEMATICA
Table[Product[3^k+1, {k, 0, n}], {n, 0, 12}]
Table[QPochhammer[-1, 3, n+1], {n, 0, 12}]
PROG
(PARI) a(n) = prod(k=0, n, 3^k+1); \\ Michel Marcus, Jan 25 2019
(Magma) [(&*[3^j+1: j in [0..n]]): n in [0..20]]; // G. C. Greubel, Aug 30 2023
(SageMath) [product(3^j+1 for j in range(n+1)) for n in range(21)] # G. C. Greubel, Aug 30 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Jan 25 2019
STATUS
approved