%我

%第1，234167344134613262037954636792122339296829409134545，

%电话：7576865504552087068063552861296461311796019140704352872949，

%邮编：900755169727258516258516943733672733659042973913187364359073187434359017343797272727263813187364359017343797272726381318743435901734379727272726373919131874343437343437343434373434372727272727243434343434373434343434343

%A286781第2栏。

%H Gheorghe Coserea，<a href=“/A286787/b286787.txt”>n，a（n）表，n=2..211</a>

%o（平价）

%o A286781用户（N，t='t）={

%o我的（x='x+o（'x^N），y0=1+o（'x^N），y1=0，N=1）；

%o while（n++，

%o y1=（1+x*y0+2*x^2*y0'）*（1-x*y0*（1-t））/（1-x*y0）^2；

%o如果（y1==y0，break（））；y0=y1；）；

%o y0；

%o}；

%o Kol（K，N=20）={

%o my（s=A286781用户（N+K，'t+o（'t^（K+1）））；

%o向量（N，N，polcoeff（polcoeff（s，K+N-1），K））；

%o}；

%o Kol（2）

%参见A286781。

%不知道

%氧2,2

%2017年5月16日