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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A242093型 不等n X k二元矩阵的数量A(n,k),其中等价表示行或列或符号集的置换;方阵A(n,k),n>=0,k>=0。 13
1,1,1,1,1,2,2,1,1,2,5,2,1,1,3,8,3,1,1,3,14,18,14,3,1,4,20,47,47,20,4,1,4,30,95,173,95,30,4,1,5,40,200,545,200,40,5,1,5,55,367,1682,1682,367,55,5,1,6,70,674,474 5、14386、14386、4745、674、70、6、1 (列表桌子图表参考历史文本内部格式)
抵消
0,8
链接
阿洛伊斯·海因茨,反对角线n=0..35,平坦
例子
A(1,4)=3:[0 0 0 0],[1 0 0],[11 0 0]。
A(1,5)=3:[0 0 0 0],[1 0 0 0],[11 1 0 0 0]。
A(2,2)=5:
[0 0] [1 0] [1 1] [1 0] [1 0]
[0 0], [0 0], [0 0], [1 0], [0 1].
A(3,2)=8:
[0 0] [1 0] [1 1] [1 0] [1 0] [1 0] [1 0] [1 1]
[0 0], [0 0], [0 0], [1 0], [0 1], [1 0], [0 1], [1 0].
[0 0] [0 0] [0 0] [0 0] [0 0] [1 0] [1 0] [0 0]
方阵A(n,k)开始:
1, 1, 1, 1, 1, 1, 1, 1, ...
1、1、2、2、3、3、4、4、。。。
1, 2, 5, 8, 14, 20, 30, 40, ...
1, 2, 8, 18, 47, 95, 200, 367, ...
1, 3, 14, 47, 173, 545, 1682, 4745, ...
1, 3, 20, 95, 545, 2812, 14386, 68379, ...
1, 4, 30, 200, 1682, 14386, 126446, 1072086, ...
1, 4, 40, 367, 4745, 68379, 1072086, 16821330, ...
MAPLE公司
带有(数字理论):
b: =proc(n,i)选项记忆`if`(n=0,{0},`if`(i<1,{},
{seq(映射(p->p+j*x^i,b(n-i*j,i-1))[],j=0..n/i)})
结束时间:
g: =proc(n,k)选项记忆;添加(添加*
系数(u,x,d),d=除数(ilcm(i,j))^(igcd(i,j))*
系数(s,x,i)*系数(t,x,j),j=1..度(t)),
i=1..度)/mul(i^系数(u,x,i)*coeff(u,x,i)!,
i=1..度(u))/mul(i^系数(t,x,i)*coeff(t,x,i)!,
i=1..度(t))/mul(i ^系数(s,x,i)*系数(s,x,i)!,
i=1..度),u=b(2$2),t=b(n$2)),s=b(k$2)
结束时间:
A: =(n,k)->g(排序([n,k])[]):
seq(seq(A(n,d-n),n=0..d),d=0..12);
数学
b[n_,i_]:=b[n,i]=如果[n==0,{0},如果[i<1,{},扁平[Table[Map[Function[p,p+j*x^i],b[n-i*j,i-1]],{j,0,n/i}]];
g[n_,k_]:=g[n,k]=Sum[Sum[Product[Product[With[{gc=GCD[i,j]*Coefficient[s,x,i]*Coffecient[t,x,j]},如果[gc==0,1,Sum[d*Coefcient[u,x,d],{d,Divisors[LCM[i,j]]}]^gc]],{j,1,Exponent[t,x]}],
{i,指数[s,x]}]/乘积[i^系数[u,x,i]*系数[u、x、i]!,
{i,指数[u,x]}]/乘积[i^系数[t,x,i]*系数[t、x、i]!,
{i,指数[t,x]}]/乘积[i^系数[s,x,i]*系数[s、x,i]!,
{i,指数[s,x]}],{u,b[2,2]}],}t,b[n,n]},{s,b[k,k]}];
A[n_,k_]:=g@@排序[{n,k}];
表[表[A[n,d-n],{n,0,d}],{d,0,12}]//扁平(*Jean-François Alcover公司2016年4月25日,改编自Maple,于2021年1月1日更新*)
交叉参考
主对角线给出A091059号.
囊性纤维变性。A028657号,A241956型,A242095型.
关键词
非n,
作者
阿洛伊斯·海因茨2014年8月14日
状态
经核准的

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

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

上次修改时间:2024年4月19日07:11 EDT。包含371782个序列。(在oeis4上运行。)