登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A145148号 第6列,共列A145142号. 2
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之后*)
交叉参考
囊性纤维变性。A145153号.
关键词
非n
作者
阿洛伊斯·海因茨2008年10月3日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月25日03:44。包含373694个序列。(在oeis4上运行。)