|
%I #7 Feb 20 2016 09:07:11
%S 1,1,2,3,5,9,15,33,62,130,264,554,1081,2237,4483,8952,17933,35921,
%T 71755,143502,286713,573198,1146540,2292277,4584087,9166802,18334880,
%U 36668210,73336840,146672469,293348402,586695560,1173398119,2346805311,4693617598,9387229673
%N Expansion of Product_{k>=1} ((1 - k*x^k) / (1 - 2*x^k)).
%H Vaclav Kotesovec, <a href="/A269153/b269153.txt">Table of n, a(n) for n = 0..3300</a>
%F a(n) ~ c * 2^n, where c = Product_{k>=1} (2^k - k)/(2^k - 1) = 0.27320499481666294779155052256744055231134605935215258251663905...
%t nmax = 50; CoefficientList[Series[Product[(1-k*x^k)/(1-2*x^k), {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A070933, A267005, A269144.
%K nonn
%O 0,3
%A _Vaclav Kotesovec_, Feb 20 2016
|
