|
%I #6 Dec 10 2023 18:13:03
%S 1,6,54,378,2754,17982,121014,765450,4894506,30429918,189311094,
%T 1160312850,7113869226,43228473822,262556300286,1587419581410,
%U 9590551158474,57795130268694,348125978482686,2093918636332530,12590534397102930,75647788993941174
%N Expansion of Product_{k>=1} 1 / (1 - 2*3^k*x^k).
%F a(n) ~ c * 6^n, where c = A065446 = 1/QPochhammer(1/2) = 3.46274661945506361153...
%t nmax = 25; CoefficientList[Series[Product[1/(1-2*3^k*x^k), {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A242587, A300582.
%K nonn
%O 0,2
%A _Vaclav Kotesovec_, Mar 09 2018
|
