登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A326612型 指数,其中A001175(Pisano period)设置新的记录值。 1
1、2、3、5、6、10、25、30、50、98、125、150、206、243、250、490、566、590、625、750、1030、1046、1094、1154、1214、1226、1250、2450、2738、2830、2846、2894、2906、3086、3125、3750、4802、5534、5594、5606、5666、5714、5770、5834、5906、5990、6070、6130、6250 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

记录值:1、3、8、20、24、60、100、120、300、336、500、600、624、648、1500、1680、1704、1740、2500、3000。。。

链接

柴华武,n=1..10000的n,a(n)表(n=1..1547作者:Richard n.Smith)

黄体脂酮素

(PARI)fibmod(n,m)=((Mod([1,1;1,0],m))^n)[1,2]

entryp(p)=我的(k=p+[0,-1,1,1,-1][p%5+1],f=系数(k));对于(i=1,#f[,1],对于(j=1,f[i,2],if((Mod([1,1;1,0],p)^(k/f[i,1]))[1,2],中断);k/=f[i,1]);k

entry(n)=if(n==1,return(1));my(f=因子(n),v);v=向量(#f~,i,if(f[i,1]>1e14,entryp(f[i,1]^f[i,2]),entryp(f[i,1])*f[i,1]^(f[i,2]-1));if(f[1,1]==2&&f[1,2]>1,v[1]=3<<max(f[1,2]-2,1));lcm(v)

a(n)=如果(n==1,返回(1));my(k=entry(n));forstep(i=k,n^2,k,if(fibmod(i-1,n)==1,return(i)))

print1(r=1);对于(n=21000,如果(a(n)>r,r=a(n);print1(“,”n)))\\after查尔斯R格雷特豪斯四世在里面A001175

交叉引用

囊性纤维变性。A001175.

上下文顺序:A335597飞机 邮编:A164523 A227305*A240949号 A033159 邮编:A199366

相邻序列:A326609型 A326610型 A326611型*A326613型 A326614型 A326615型

关键字

作者

理查德·N·史密斯2019年7月14日

状态

经核准的

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

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

上次修改日期:美国东部时间2020年8月8日19:29。包含336298个序列。(运行在oeis4上。)