登录
搜索: a11800-编号:a11800
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
a(n)=最小整数>=互素的nA118000个(n-1)。a(n)=A118000个(n)-A118000个(n-1)。
+20
2
1, 2, 4, 4, 5, 7, 7, 11, 9, 11, 11, 13, 13, 15, 15, 17, 17, 19, 19, 21, 21, 23, 23, 25, 25, 27, 27, 29, 29, 31, 31, 33, 33, 35, 35, 37, 37, 39, 39, 41, 41, 43, 43, 45, 45, 47, 47, 49, 49, 51, 51, 53, 53, 55, 55, 57, 57, 59, 59, 61, 61, 63, 63, 65, 65, 67, 67, 69, 69, 71, 71, 73
抵消
1,2
MAPLE公司
A118000个:=proc(nmax)局部a,n;a:=[0];而nops(a)<nmax do n:=nops(a);而gcd(n,op(-1,a))<>1做n:=n+1;od;a:=[op(a),op(-1,a)+n];od;返回(a);结束时间:11800个:=A118000个(100):对于从1到nops的n(11800个)-1执行printf(“%d,”,op(n+1,11800个)-op(n,11800个)) ; od#R.J.马塔尔2007年6月6日
数学
A118000个[编号]:=A118000个[n] =如果[n==0,0,模块[{a1=A118000个[n-1],k},对于[k=n,真,k++,如果[CoprimQ[a1,k],返回[a1+k]]]];
a[n]:=A118000个[无]-A118000个[n-1];
表[a[n],{n,1,72}](*让-弗朗索瓦·奥尔科弗2024年4月8日*)
交叉参考
囊性纤维变性。A118000个,A118003号.
关键词
非n
作者
勒罗伊·奎特2006年4月9日
扩展
由更正和扩展R.J.马塔尔2007年6月6日
状态
经核准的
a(0)=0。a(n)=a(n-1)+(最大整数<=n,与a(n-1)互素)。
+10
0, 1, 3, 5, 9, 14, 19, 26, 33, 41, 51, 62, 73, 86, 99, 113, 129, 146, 163, 182, 201, 221, 243, 266, 289, 314, 339, 365, 393, 422, 451, 482, 513, 545, 579, 614, 649, 686, 723, 761, 801, 842, 883, 926, 969, 1013, 1059, 1106, 1153, 1202, 1251, 1301, 1353, 1406
抵消
0,3
链接
迈克尔·德弗利格,n=0..10000时的n,a(n)表
例子
a(7)=26。8不是26的互质。与26互素的最小整数<=8是7,因此a(8)=a(7)+7=33。
MAPLE公司
A118002号:=proc(nmax)局部a,n;a:=[0];而nops(a)<nmax do n:=nops(a);而gcd(n,op(-1,a))<>1做n:=n-1;od;a:=[op(a),op(-1,a)+n];od;返回(a);结束时间:A118002号(100) ; #R.J.马塔尔2007年6月6日
数学
折叠列表[Block[{k=0},While[!CoprimeQ[#1,#2-k],k++]#1+#2-k]&,0,范围@53](*迈克尔·德弗利格2017年9月30日*)
nxt[{n_,a_}]:={n+1,a+SelectFirst[Range[n,1,-1],互质Q[#,a]&]};联接[{0,1},NestList[nxt,{3,3},60][[All,2]]](*哈维·P·戴尔,2019年1月21日*)
交叉参考
囊性纤维变性。A118000个,A118003号.
关键词
非n
作者
勒罗伊·奎特2006年4月9日
扩展
更多术语来自R.J.马塔尔2007年6月6日
状态
经核准的

搜索在0.007秒内完成