%I#52 2023年4月23日15:27:51

%S 1,1,1,2,1,1,2,1,1,2,1,3,2,1,1,3,3,1,3,1,5,1,2,2,2,1,1,5,3,1,1,2，

%T 1,1,2,3,1,3,1,4,2,1,2,3,1,2,1,1,3,1,1,3,1,1,3,3,12,2,6,2,3,12,3,2,1，

%U 1,2,4,3,2,1,1,3,3,1,2,4,1,5,1,2,6,1,2,1,1,1,3,7,2,5,1,1,2,1,1,1

%N最小k，使得2*N*k+1是素数。

%序列有界吗_Zak Seidov，2014年3月25日

%C回答：不，对于任何给定的N，可以用中国余数定理构造a（N）>N的数字N，参见A239727_Charles R Greathouse IV，2014年3月25日

%A005097中n的C a（n）=1_罗伯特·伊斯雷尔（Robert Israel），2016年10月26日

%H Zak Seidov，<a href=“/A016014/b016014.txt”>n的表格，a（n）表示n=1.-10000</a>

%p f：=进程（n）局部k；

%p代表k从1到do，如果是素数（2*n*k+1），则返回kfiod

%p端程序：

%p映射（f，[1..100]美元）；#_罗伯特·伊斯雷尔（Robert Israel），2016年10月26日

%t Do[k=1；cp=n*k+1；While[！PrimeQ[cp]，k++；cp=n*k+1]；打印[k]，{n，2400，2}]（*雷州，2005年2月23日*）

%t lk[n_]：=模[{k=1}，While[！素数Q[2n k+1]，k++]；k] ；数组[lk，100]（*_哈维·P·达尔，2023年4月23日*）

%o（PARI）a（n）=我的（k）；while（！i素数（2*n*（k++）+1），）；2014年3月25日，科勒斯·R·格里特豪斯四世

%o（Python）

%o来自sympy import isprime

%o定义a（n）：

%o k=1

%o当不为素数时（2*n*k+1）：k+=1

%o返回k

%o打印（[a（n）代表范围（1100）内的n）]#_Michael S.Branicky_，2022年3月28日

%Y参考A005097，A103961。

%Y A070846包含相应的素数。

%Y记录在A239746中，索引在A239727中。

%K nonn公司

%O 1,4型

%A _罗伯特·G·威尔逊v_