|
%I #6 Aug 27 2018 09:08:07
%S 1,1,7,16,64,133,465,1008,3023,6695,18206,40175,103229,225470,549873,
%T 1194620,2801742,6015042,13686306,29063919,64424496,135362432,
%U 293512852,610061141,1298516539,2670738781,5591712472,11388116508,23499720744,47403692965,96564236754
%N Expansion of Product_{i>=1, j>=1, k>=1} 1/(1 - i*j*k*x^(i*j*k)).
%H Vaclav Kotesovec, <a href="/A318481/b318481.txt">Table of n, a(n) for n = 0..500</a>
%t nmax = 40; CoefficientList[Series[Product[Product[Product[1/(1-i*j*k*x^(i*j*k)), {i, 1, nmax}], {j, 1, nmax}], {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A006906, A318415.
%Y Cf. A000041, A280540, A318413, A318482.
%K nonn
%O 0,3
%A _Vaclav Kotesovec_, Aug 27 2018
|
