|
|
A307165型 |
| 对k进行编号,使序列f(0)=f(1)=k,f(x)=(a*b)mod(a+b+1),其中a=f(x-1)和b=f(x2)是一个循环。 |
|
0
|
|
|
|
偏移
|
1,3
|
|
评论
|
下一项,如果存在,则大于1.5*10^7。
Abmod(x,y,0)=x;
Abmod(x,y,1)=y;
Abmod(x,y,n)=(a*b)mod(a+b+1),其中a和b是前面的两个术语:Abmod。
|
|
链接
|
|
|
例子
|
Abmod(4,4)是[4,4,7,4,4,7,4,7,…]。
|
|
数学
|
cyclePos[s_]:=模块[{sp=SequencePosition[s[[1;;-3]],s[[-2;;-1]]]},如果[Length[sp]==0,0,sp[[1,1]]];a[n_]:=模[{f,g},g[a_,b_]:=Mod[a*b,a+b+1];f[0]=f[1]=n;f[k_]:=f[k]=g[f[k-1],f[k-2];s={};m=0;当[Length[s]<4||cyclePos[s]==0时,AppendTo[s,f[m]];m++];循环位置[1];序列={};做[If[a[j]==0,AppendTo[seq,j]],{j,0,340}];序列(*阿米拉姆·埃尔达尔2019年7月6日*)
|
|
交叉参考
|
|
|
关键词
|
非n,更多,坚硬的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|