%I M5083#40 2022年9月8日08:44:35

%S 0,1,20,50,921702844346208421100139417242090249229303404，

%电话：391444605042566063147004773084929290101241091190012842，

%电话：138201483415884169701809219250

%N十二面体曲面数：a（0）=0，a（1）=1，a（2）=20，其后为2*（（3*N-7）^2+21）。

%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

%H Vincenzo Librandi，n的表格，n=0..1000的a（n）</a>

%H<a href=“/index/Rec#order_03”>具有常系数的线性重复出现的索引条目，签名（3，-3,1）。

%F a（n）=顶点+边*（n-2）+面*面数（n-3）=20+30（n-2）+12*A000326（n-3）。-_米奇·哈里斯，2006年10月25日

%F From _G.C.Greubel_，2019年8月30日

%传真：x*（1+17*x-7*x^2+x^3+24*x^4）/（1-x）^3。

%例如：-140-73*x-12*x^2+（140-66*x+18*x^2）*exp（x）。（结束）

%p序列（系数（级数（x*（1+17*x-7*x^2+x^3+24*x^4）/（1-x）^3，x，n+1），x，n），n=0。。45); # _G.C.Greubel，2019年8月30日

%t加入[{0,1,20}，2（（3Range[3,40]-7）^2+21）]（*哈维·P·戴尔，2011年9月24日*）

%t连接[{0,1,20}，系数列表[Series[2*（25-29*x+22*x^2）/（1-x）^3，{x，0,50}]，x]]（*_Winenzo Librandi_，2012年7月7日*）

%o（岩浆）I:=[0，1，20，50，92，170]；[n le 6在[1..50]]中选择I[n]else 3*Self（n-1）-3*Self（n-2）+Self（n-3）:n；//_文森佐·利班迪（Vincenzo Librandi），2012年7月7日

%o（PARI）我的（x='x+o（'x^45））；concat（[0]，Vec（x*（1+17*x-7*x^2+x^3+24*x^4）/（1-x）^3））\\_G.C.格鲁贝尔，2019年8月30日

%o（鼠尾草）

%o定义A007589_list（prec）：

%o P.<x>=PowerSeriesRing（ZZ，prec）

%o返回P（x*（1+17*x-7*x^2+x^3+24*x^4）/（1-x）^3）.list（）

%o A007589_list（45）#_G.C.Greubel_，2019年8月30日

%o（间隙）a:=[50,92170]；；对于[4..45]中的n，做a[n]：=3*a[n-1]-3*a[n-2]+a[n-3]；od；连接（[0，1，20]，a）；#_G.C.Greubel，2019年8月30日

%K nonn，简单

%0、3

%A.N.J.A.Sloane，R.K.盖伊_

%E修订自N.J.A.Sloane的定义，2011年9月25日