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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A061417号 循环旋转前的排列数;置换站点交换项链。 16
1, 2, 4, 10, 28, 136, 726, 5100, 40362, 363288, 3628810, 39921044, 479001612, 6227066928, 87178295296, 1307675013928, 20922789888016, 355687438476444, 6402373705728018, 121645100594641896, 2432902008177690360, 51090942175425331320, 1124000727777607680022 (列表;图表;参考;;历史;文本;内部格式)
偏移
1,2
评论
如果将置换转换为(i,p(i))置换阵列,则通过它们的“SW-NE对角环向位移”获得该自同构(请参见中的Matthias Engelhardt的Java程序A006841号)下面的Maple过程将每个置换转换为一个siteswap模式(用于杂耍),将其旋转一个数字,并将生成的新(或相同)siteswip模式转换回置换。
当排列子集由A064640号受到相同的自同构A002995号.
仅与n次循环置换群共轭时,n次对称群的共轭类数-阿提拉·埃格里·纳吉2014年8月15日
同时给出了在循环分解中顶点旋转作用下{1…n}置换的等价类数。单词上的相应动作对m<n和n->1应用m->m+1,并向右旋转一次。例如,在循环旋转的应用下,(24531)首先变成(35142),然后向右旋转以给出(23514)-古斯·怀斯曼,2019年3月4日
链接
配方奶粉
a(n)=(1/n)*Sum_{d|n}φ(n/d)*(n/d)^d)*(d!)。
例子
如果我有一个像25431这样的五元素排列,在循环符号(1 2 5)(3 4)中,我将数字1-5顺时针标记在一个圆上,并画出从1到2、从2到5、从5到1的有向边,以及3到4之间的双向边。所有产生该弦图某些旋转(丢弃节点标签)的5元素排列都属于与25431相同的等价类。序列给出了此类等价类的计数。
MAPLE公司
代数公式:使用(numtheory);SSRPCC:=进程(n)局部d,s;s:=0;对于除数(n)中的d,做s:=s+phi(n/d)*((n/d)^d)*(d!);od;返回(s/n);结束;
经验性:与(组);SiteSwapRotationPermutationCycleCounts:=proc(upto_n)local b,u,n,a,r;a:=[];对于从1到upto_n的n,做b:=[];u:=n!;对于从0到u-1的r,执行b:=[op(b),1+PermRank3R(SiteSwap2Perm1(rotateL(Perm2SiteSwap2(PermUnrank3Rfix(n,r))))];od;a:=[op(a),计数周期(b)];od;返回(a);结束;
PermUnrank3Rfixaux:=进程(n,r,p)局部;如果(0=n),则返回(p);其他s:=楼层(r/((n-1)!));返回(PermUnrank3Rfixaux(n-1,r-(s*((n-1)!)),permul(p,[[n,n-s]]));fi;结束;
PermUnrank3Rfix:=(n,r)->转换(PermUnrank3Rfixaux(n,r,[]),“permlist”,n);
SiteSwap2Perm1:=进程本地e、n、i、a;n:=nops(s);a:=[];对于i从1到n做e:=((i+s[i])mod n);如果(0=e),则e:=n;fi;a:=[操作(a),e];od;RETURN(转换(invperm(convert(a,'disjcyc')),'permlist',n));结束;
数学
a[n_]:=(1/n)*总和[EulerPhi[n/d]*(n/d)^d*d!,{d,除数[n]}];表[a[n],{n,1,21}](*Jean-François Alcover公司2012年10月9日,根据公式*)
表[Length[Select[Permutations[Range[n]],#==First[Sort[NestList[RotateRight[#/.k_Integer:>If[k==n,1,k+1]]&,#,n-1]]&]],{n,8}](*古斯·怀斯曼2019年3月4日*)
黄体脂酮素
(哈斯克尔)
a061417=总和。a047917_低--莱因哈德·祖姆凯勒2014年3月19日
(GAP)列表([1..10],n->大小(OrbitsDomain(循环组(IsPermGroup,n),对称组(IsPermGroup(n),^))#阿提拉·埃格里·纳吉2014年8月15日
(PARI)a(n)=(1/n)*sumdiv(n,d,eulerphi(n/d)*(n/d)^d*d!)\\因德拉尼尔·戈什2017年4月10日
(Python)
从sympy导入除数,阶乘,totiten
定义a(n):
返回和(totiten(n//d)*(n//d)**d*除数(n)中d的阶乘(d))//n
打印([a(n)代表范围(1,22)中的n])#因德拉尼尔·戈什2017年4月10日
交叉参考
囊性纤维变性。A006841号,A060495型有关其他Maple程序,请参见A060501型(永久站点交换2),A057502号(计数周期),A057509号(旋转L),A060125号(PermRank3R和permul)。
A061417号[p]=A061860型[p] =(p-1)+(p-1)对于所有素数p。
A064636号(错位-相同的自同构)。
A061417号[无]=A064649号[n] /编号。
关键词
非n,容易的,美好的
作者
安蒂·卡图恩2001年5月2日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月25日12:29。包含372788个序列。(在oeis4上运行。)