登录
可分别被两个连续素数整除的两个连续整数中较小的一个。
9

%I#14 2021年3月23日05:20:24

%S 2,8,9,14,20,21,24,26,32,38,39,44,50,54,55,56,62,68,69,74,77,80,84,86,

%电话90,92,98,99104110114115116122125128129134140144146152,

%电话158159160164169170174175176182188189194195200204206

%N分别可被两个连续素数整除的两个连续整数中较小的一个。

%C在这个序列中有任意长的连续整数串;例如,A072562(k+1)之后是至少k-1个以上的连续成员_David Wasserman,2004年10月21日

%H Amiram Eldar,n的表,a(n)表示n=1..10000</a>

%e54是一个项,因为54和55分别可以被3和5整除。55也是一个术语,因为55和56可以被5和7整除。56也是一个术语,因为56和57可以被2和3整除。

%t f[n_Integer]:=展平[表[#1]&@@@FactorInteger[n]];NextPrim[n_]:=块[{k=n+1},While[!PrimeQ[k],k++];k] ;做[p=f[n];l=长度[p];t=表格[n+i,{i,0,1}];k=1;而[k<l+1和并集[Mod[t,NestList[NextPrim,p[k]],1]]!={0},k++];如果[k<l+1,打印[n]],{n,2,220}]

%t npQ[n_]:=或@@可除[n+1,NextPrime[First/@FactorInteger[n]]];选择[范围[2210],npQ[#]&](*_Jayanta Basu_,2013年7月3日*)

%Y参见A073755、A073607、A072555、A073 754、A073756、A072562。

%K nonn公司

%O 1,1号机组

%A _Amarnath Murthy,2002年8月4日

%E编辑:Robert G.Wilson v_,2002年8月7日