|
|
A090277号 |
| bell-ringing中的“Plain Bob Minimus”是排列序列p_1=(1,2,3,4),p_2=(2,1,4,3)。。它以周期24遍历{1,2,3,4}的所有排列;序列给出第n个置换位置1的数字。 |
|
7
|
|
|
1, 2, 2, 4, 4, 3, 3, 1, 1, 3, 3, 2, 2, 4, 4, 1, 1, 4, 4, 3, 3, 2, 2, 1, 1, 2, 2, 4, 4, 3, 3, 1, 1, 3, 3, 2, 2, 4, 4, 1, 1, 4, 4, 3, 3, 2, 2, 1, 1, 2, 2, 4, 4, 3, 3, 1, 1, 3, 3, 2, 2, 4, 4, 1, 1, 4, 4, 3, 3, 2, 2, 1, 1, 2, 2, 4, 4, 3, 3, 1, 1, 3, 3, 2, 2, 4, 4, 1, 1, 4, 4, 3, 3, 2, 2, 1, 1, 2, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
常系数线性递归的索引项,签名(1,0,0,0,-1,1,0,0,0,0,-1,1,0,0,0,0,-1,1)。
|
|
配方奶粉
|
第24段。
当n>19时,a(n)=a(n-1)-a(n-6)+a(n-7)-a。
通用格式:x*(-x^18-x^17-x^15-x^13-x^12+2*x^11-4*x^9+x^7-x^6+x^5-2*x^3-x-1)/(x^19-x^18+x^13-x^12+x^7-x^6+x-1)。(结束)
|
|
例子
|
24个排列的完整列表如下(当前序列给出第一列):
1 2 3 4
2 1 4 3
2 4 1 3
4 2 3 1
4 3 2 1
3 4 1 2
3 1 4 2
1 3 2 4
1 3 4 2
3 1 2 4
3 2 1 4
2 3 4 1
2 4 3 1
4 2 1 3
4 1 2 3
1 4 3 2
1 4 2 3
4 1 3 2
4 3 1 2
3 4 2 1
3 2 4 1
2 3 1 4
2 1 3 4
1 2 4 3
|
|
MAPLE公司
|
环:=proc(k)选项记住;局部l、a、b、c、swap、h;l: =[1,2,3,4];交换:=进程(i,j)h:=l[i];l[i]:=l[j];l[j]:=h结束;a: =proc()交换(1,2);掉期(3,4);l[k]结束;b: =proc()交换(2,3);l[k]结束;c: =proc()交换(3,4);l[k]结束;[l[k],seq([seq([a(),b()][],j=1..3),a()、c()][],i=1..3()]结束:a:=n->环(1)[modp(n-1,24)+1]:seq(a(n),n=1..99)#阿洛伊斯·海因茨2008年8月19日
|
|
数学
|
环[k_]:=环[k]=模[{l=范围[4],a,b,c,交换,h},交换[i_,j_]:=(h=l[[i]];l[i]]=l[j]];l[j]]=h);a:=(掉期[1,2];掉期[3,4];l[[k]]);b:=(互换[2,3];l[[k]]);c:=(互换[3,4];l[[k]]);连接[{l[[k]]},表[{表[{a,b},{j,1,3}],a,c},{i,1,3}]//Flatten];a[n]:=环[1][[Mod[n-1,24]+1]];表[a[n],{n,1,99}](*Jean-François Alcover公司2014年3月19日之后阿洛伊斯·海因茨*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|