登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A034793号 a(1)=1;此后a(n+1)是最小的k>a(n),使得k是所有i<=n的平方mod a(i)。
1, 2, 3, 4, 9, 13, 16, 25, 36, 49, 64, 81, 100, 121, 144, 169, 196, 225, 256, 289, 324, 361, 400, 441, 484, 529, 576, 625, 676, 729, 784, 841, 900, 961, 1024, 1089, 1156, 1225, 1296, 1369, 1444, 1521, 1600, 1681, 1764, 1849, 1936, 2025, 2116, 2209, 2304 (列表图表参考历史文本内部格式)
抵消
1,2
评论
对于7<=n<10^12.5,a(n)=(n-3)^2。在ERH上,这适用于所有n>=7;它无条件地容纳所有n,但数量有限-查尔斯·格里特豪斯四世2012年3月29日
a(n)是大于a(n-1)的最小整数,使得a(n-R.J.马塔尔,2015年7月27日
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..500时的n,a(n)表
配方奶粉
显然包括所有正方形以及2、3和13。
MAPLE公司
A034793号:=进程(n)
选项记忆;
局部a,wrks;
如果n=1,则
1;
其他的
对于来自procname(n-1)+1 do的a
wrks:=真;
对于i从1到n-1 do
如果numtheory[象限](a,procname(i))<>1,则
wrks:=假;
断裂;
结束条件:;
结束do;
如果wrks那么
返回a;
结束条件:;
结束do:
结束i#R.J.马塔尔,2015年7月27日
数学
a[n]:=如果[n<7,{1,2,3,4,9,13}[[n]],(n-3)^2];表[a[n],{n,1,60}](*Jean-François Alcover公司2015年7月22日,之后查尔斯·格里特豪斯四世*)
黄体脂酮素
(哈斯克尔)
a034793 n=a034793_列表!!(n-1)
a034793_list=1:f[2..][1]其中
f(x:xs)ys|和$map(isSqMod x)ys=x:f xs(x:ys)
|否则=f xs-ys
isSqMod u v=u`mod`v`elem`(映射((`mod`v))。(^2)[0..v-1])
--莱因哈德·祖姆凯勒2012年3月27日
(PARI)a(n)=如果(n<7,[1,2,3,4,9,13][n],(n-3)^2)\\查尔斯·格里特豪斯四世2012年3月29日
交叉参考
囊性纤维变性。A034903号,A054762号.
关键词
非n,美好的
作者
扩展
更精确的定义来自乔瓦尼·雷斯塔2015年7月22日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年4月19日23:15。包含371798个序列。(在oeis4上运行。)