|
|
|
|
1, 21, 322, 4536, 68313, 1123815, 19826015, 368232150, 7247538298, 152150838840, 3403471995560, 80589585571040, 2012376195058384, 52929114594971184, 1464737200231998960, 42545324327111272800, 1293727732305595341216
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
7,2
|
|
链接
|
|
|
MAPLE公司
|
row:=proc(n)选项记住;局部f,i,x;f: =不适用(简化(总和('cat(a||i)*x^i','i'=0..n-1),x);unapply(subs(solve({seq(f(i+1)=coeftayl(x/(1-x-x^4)/(1-x)^i,x=0,n),i=0..n-1)},{seq,cat(a||i),i=0..n-1){)}),sum('cat(a | |i)*x^i','i'=0..n-1'),x);结束:a:=n->`if`(n=0,0,coeftayl(行(n)(x),x=0,6)*(n-1)!):seq(a(n),n=7..26);
|
|
数学
|
row[n_]:=row[n]=模块[{f,a,eq},f=函数[x,总和[a[k]*x^k,{k,0,n-1}]];eq=表[f[k+1]=系列系数[x/(1-x-x^4)/(1-x)^k,{x,0,n}],{k,0,n-1}];列表@@f[1]/。求解[eq]//第一个];a[n]:=行[n][[7]*(n-1)!;表[a[n],{n,7,26}](*Jean-François Alcover公司,2014年2月14日,在Maple之后*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|