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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A145151号 第9列,共列A145142号. 1
1, 45, 1320, 32670, 766623, 17990973, 431474615, 10643661600, 271155254513, 7162999744329, 196798229724018, 5629113506142750, 167609902621721416, 5193256923854366136, 167378142642521719832, 5608242214782541676496 (列表;图表;参考;;历史;文本;内部格式)
抵消
10,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,9)*(n-1)!):seq(a(n),n=10..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][[10]]*(n-1)!;表[a[n],{n,10,26}](*Jean-François Alcover公司,2014年2月14日,在Maple之后*)
交叉参考
囊性纤维变性。A145153号.
关键词
非n
作者
阿洛伊斯·海因茨2008年10月3日
状态
经核准的

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

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

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