OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A367336型 [n]的置换p的数目,使得p(i),p(i+3),p(i+6),。。。在{1,2,3}中为i形成一个上下序列。 2
1, 1, 2, 6, 12, 30, 90, 420, 2240, 13440, 84000, 577500, 4331250, 36036000, 322882560, 3099672576, 31513337856, 340409701632, 3893435962416, 47122428697344, 600341948743680, 8030803773358080, 112453396587417600, 1646232972560748000, 25147419121286426250 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,3
评论
使p(i)<p(i+3)>p(i+6)<。。。对于i≤3。
链接
阿洛伊斯·海因茨,n=0..485的n,a(n)表
例子
a(4)=12:1234、1243、1324、1342、1423、1432、2134、2143、2314、2413、3124、3214。
a(5)=30:12345、12354、12435、12453、12534、12543、13245、13254、13425、13524、14235、14325、21345、21354、21435、21453、21534、21543、23145、23154、24135、31245、31254、31452、31542、32145、32154、41253、41352、42153。
MAPLE公司
b: =proc(u,o)选项记忆;
`如果`(u+o=0,1,加上(b(o-1+j,u-j),j=1..u)
结束时间:
a: =n->(l->组合[多项式](n,l[])*mul(
b(s,0),s=l))([楼层((n+i)/3)$i=0..2]):
seq(a(n),n=0..27);
数学
多项式[n_,k_List]:=n/次数@@(k!);
b[u_,o_]:=b[u,o]=如果[u+o==0,1,和[b[o-1+j,u-j],{j,1,u}]];
a[n_]:=函数[l,乘积[b[s,0],{s,l}]*多项式[n,l]][表[Floor[(n+i)/3],{i,0,2}]];
表[a[n],{n,0,27}](*Jean-François Alcover公司2023年11月27日,之后阿洛伊斯·海因茨*)
交叉参考
第k列=第3列,共列616351美元.
囊性纤维变性。A000111号,A000142号,A022916号.
关键词
非n
作者
阿洛伊斯·海因茨2023年11月14日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月3日16:13。包含373063个序列。(在oeis4上运行。)