%I#12 2015年2月9日09:29:28

%S 1,0,11,7714349511333058727117774158096701220187495528，

%电话：109962624129275236308112514492395284150556265105852923，

%电话：2199759995333489305449121895736986338394246447732852963154926592263088456137861276442019

%N的组成数，使得最小的部分具有10的重数。

%C猜想：通常，对于k>0，A238342的k列渐近于n^k*（（1+sqrt（5））/2）^（n-2*k-1）/（5^（（k+1）/2）*k！）_瓦茨拉夫·科特索维奇，2014年5月2日

%H Joerg Arndt和Alois P.Heinz，n的表，n的a（n）=10..1000</a>

%F a（n）~n^10*（（1+sqrt（5））/2）^（n-21）/（5^（11/2）*10！）_瓦茨拉夫·科特索维奇，2014年5月2日

%p b:=proc（n，s）选项记忆`如果`（n=0，1，

%p`if`（n<s，0，展开（加（b（n-j，s）*x，j=s.n）））

%p端：

%p a：=进程（n）局部k；k： =10；

%p加法（（p->add（coeff（p，x，i）*二项式（i+k，k），

%p i=0..度（p））（b（n-j*k，j+1）），j=1..n/k）

%p端：

%p序列（a（n），n=10..40）；

%tb[n_，s_]：=b[n，s]=如果[n==0，1，如果[n<s，0，展开[Sum[b[n-j，s]*x，{j，s，n}]]]；a[n]：=与[{k=10}，和[Function[{p}，Sum[系数[p，x，i]*二项式[i+k，k]，{i，0，指数[p，x]}][b[n-j*k，j+1]]，{j，1，n/k}]]；表[a[n]，{n，10，40}]（*_Jean-François Alcover_，2015年2月9日，在Maple之后*）

%A238342的Y列k=10。

%K nonn公司

%O 10,3号机组

%A _Joerg Arndt_和_Alois P.Heinz，2014年4月30日