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

 


a(n)=最大非素数非负整数<c(n),它与c(n”)互素,其中c(n“)是第n个复合正整数。
1

%I#21 2019年12月2日21:16:39

%S 1,1,1,8,9,1,9,14,15,1,9,20,21,1,24,25,26,27,1,27,32,33,34,35,35,38,

%电话:39,25,39,44,45,35,48,49,50,51,49,54,55,56,57,49,57,62,63,64,65,65,68,

%U 69、65、69、74、75、76、77、77、80、81、65、84、85、86、87、77、90、91、92、93、94、95、95、98

%N a(N)=最大非素数非负整数<c(N),它与c(N”)互素,其中c(N)是第N个复合正整数。

%如果A002808(n)-1不是素数,则C a(n)=A002808n)-1_罗伯特·伊斯雷尔,2019年12月2日

%H Robert Israel,n表,a(n)表示n=1..10000(Lior Manor的前255个术语)

%e a(7)=9,因为9是最大的非素数整数<14(第7个复合数)(因为其他非素数数>9和<14{10和12}不是与14互素的)。

%p编号:=300:

%p NP:=删除(isprime,[1..N]):

%p代表i从2到nops(NP)do

%p x:=NP[i];

%从i-1到-1 do的k的p

%p如果igcd(NP[k],x)=1,则A[i-1]:=NP[k';断开fi

%p od公司

%日期:

%p序列(A[i],i=1..nops(NP)-1);#_罗伯特·伊斯雷尔,2019年12月2日

%t lnni[n_]:=Max[Select[Range[n-1],CompositeQ[#]&CoprimQ[#,n]&]];lnni/@Select[Range[200],CompositeQ]/。(-\[无限]->1)(*哈维·P·戴尔,2019年1月19日*)

%Y参考A002808。

%K非n

%O 1,4型

%A _罗伊查询,2006年1月12日

%E来自Loor Manor_的更多条款,2007年11月21日

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

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

上次修改时间:2024年9月20日14:50 EDT。包含376072个序列。(在oeis4上运行。)