登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

γ

标志


提示
问候整数序列的在线百科全书!)
A122090 A(1)=1。A(n)=小于A(n-1)的最小整数,是互生关系到序列的第一(n-1)项中出现的最大非素数(1或复合)。

%i

%S1、2、3、4、5、7、9、10、11、13、17、19、21、22、23、25、26、27、28、29、31、33、34、35、36

%T37、41、43、47、49、50、51、52、53、56、57、58、59、61、63、64、65、66、67、71,73、79

%u 83.85,8687.891,91,93.94949596910103107109113115116117

%n a(1)=1。A(n)=小于A(n-1)的最小整数,是互生关系到序列的第一(n-1)项中出现的最大非素数(1或复合)。

%e是大于A(20)=29的最小整数,是互质到28(序列中前20项中出现的最大非素数)为31。A(21)=31。

%P A122090:=PROC(Max)局部A,NEXA,N,LANOPR;A:=(1);LANOPR:=1;n为2,到Max n doNeTa:=OP(n-1,a)+1;而GCD(NEXTA,LANOPR)>1做NEXA:=NEXATA +1;OD;A:= [OP(A),NEXATA ];如果不是ISPrime(NEXTA)和NEXAA:LANOPR,那么LANOPR:= NEXTA;FI;OD;返回(A);结束:Mnn:= 100:Ad:= A122090(MAXN):对于i从1到Max n doPrTrF(“%d”,OP(i,Irror));结束:S.*.J.Mathalz,10月21日2006

%tf[LyList]:=块[{k=最后[L]+1,m=max [SELECT],L!Primeq([A])[] },而[GCD[k,M]>1,k++];追加[L,k];Nest [ f,{ 1 },70 ](*γ射线CHANDLARLY,10月19日2006*)

%K-NON

%O 1,2

10月17日2006日

10月19日E·钱德勒尔延伸的%E

%E更多的条款来自于10月21日2006

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改4月7日15:44 EDT 2020。包含333306个序列。(在OEIS4上运行)