提出

经核准的

编辑

提出

分配给Felix Fröhlich

a（n）是素数（n）^2的Pisano周期。

6, 24, 100, 112, 110, 364, 612, 342, 1104, 406, 930, 2812, 1640, 3784, 1504, 5724, 3422, 3660, 9112, 4970, 10804, 6162, 13944, 3916, 19012, 5050, 21424, 7704, 11772, 8588, 32512, 17030, 37812, 6394, 22052, 7550, 49612, 53464, 56112, 60204, 31862, 16290, 36290

1,1

a（n）=A001175美元(A001248号（n） ）。

（PARI）\\之后查尔斯·格里特豪斯四世在里面A001175美元（开始）

fibmod（n，m）=（（Mod（[1，1；1，0]，m））^n）[1，2]

entryp（p）=我的（k=p+[0，-1，1，-1][p%5+1]，f=系数（k））；对于（i=1，#f[，1]，对于（j=1，f[i，2]），如果（（Mod（[1，1；1，0]，p）^（k/f[i，1]））[1，2]，break）；k/=f[i，1]）；k个

条目（n）=如果（n==1，返回（1））；my（f=因子（n），v）；v=向量（#f~，i，if（f[i，1]>1e14，entryp（f[i，1]^f[i、2]），entryp[i，2]）*f[i（1]^（f[2，2]-1））；如果（f[1,1]==2&&f[1,2]>1，v[1]=3<<最大值（f[1，2]-2，1））；lcm（v）

a001175（n）=如果（n==1，返回（1））；my（k=条目（n））；对于步骤（i=k，n^2，k，if（fibmod（i-1，n）==1，return（i）））

\\（结束）

a（n）=我的（p=素数（n））；a001175（p^2）

囊性纤维变性。A001175美元,A001248号,A060305型.

分配

非n

费利克斯·弗罗利奇（Felix Fröhlich）2021年4月5日

经核准的

编辑

分配给Felix Fröhlich

分配

经核准的