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

 


A166278号
平方数组A(n,k),n,k>=0,由反对偶读取:A(n、k)是应用于长度为1的n序列的k倍f变换的总元素和。f将其输入序列中的元素与1、2、3…相乘后返回排序结果,。。。按大小降序排列。
0, 0, 1, 0, 1, 2, 0, 1, 3, 3, 0, 1, 4, 6, 4, 0, 1, 6, 10, 10, 5, 0, 1, 8, 19, 20, 15, 6, 0, 1, 12, 33, 46, 35, 21, 7, 0, 1, 16, 63, 100, 94, 56, 28, 8, 0, 1, 24, 111, 220, 242, 172, 84, 36, 9, 0, 1, 32, 201, 488, 633, 514, 290, 120, 45, 10, 0, 1, 48, 369, 1104, 1643, 1518, 984, 460, 165, 55, 11
抵消
0,6
链接
阿洛伊斯·海因茨,反对角线n=0..140,平坦
例子
A(3,4)=33,因为f([1,1,1])=[1,2,3],(f^2)([1,1,1])=[3,3,4],(f*3)([11,1,1])=[4,6,9],(f^4)([1,1,1],)=[9,12,12],9+12+12=33。
方阵A(n,k)开始:
0, 0, 0, 0, 0, 0, ...
1, 1, 1, 1, 1, 1, ...
2, 3, 4, 6, 8, 12, ...
3, 6, 10, 19, 33, 63, ...
4, 10, 20, 46, 100, 220, ...
5, 15, 35, 94, 242, 633, ...
MAPLE公司
f: =l->排序([seq(sort(l,`>`)[i]*i,i=1..nops(l))]):
A: =(n,k)->添加(i,i=(f@@k)([1$n]):
seq(seq(A(n,d-n),n=0..d),d=0..15);
数学
f[L_List]:=f[L]=排序[反向[Sort[L]]*范围[Length[L]]];
A[0,_]=0;A[n_,0]:=n;A[n_,k_]:=总[Nest[f,Range[n],k-1]];
表[A[n,k-n],{k,0,15},{n,0,k}]//展平(*Jean-François Alcover公司2016年6月7日*)
交叉参考
关键词
容易的,非n,
作者
阿洛伊斯·海因茨2009年10月10日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年9月22日11:06。包含376102个序列。(在oeis4上运行。)