nmax=25;系数列表[系列[乘积[(1+2^(k+1)*x^k)*(1+2 ^(k-1)*x*k),{k,1,nmax}]^(1/3),{x,0,nmax{],x]*9^范围[0,nmax]
nmax=25;系数列表[系列[积[(1+2^(k+1)*(9*x)^k)*(1+2 ^(k-1)*(9*x)*k),{k,1,nmax}]^(1/3),{x,0,nmax}],x]
nmax=25;系数列表[系列[(2*QPochhammer[-2,2*x]*QPochammer[-1/2,2*x]/9)^(1/3),{x,0,nmax}],x]*9^范围[0,nmax]
nmax=25;系数列表[系列[(2*QPochhammer[-2,x]*QPochammer[-1/2,x]/9)^(1/3),{x,0,nmax}],x]*18^范围[0,nmax]