%I#15 2017年8月1日02:52:04
%序号7,11,17,19,23,29,31,41,43,47,53,59,67,71,79,83,89,97101103107109,
%电话113127131137139149151163167173179181191197199211223,
%电话:2272292339241257267269269271281283293307311317331
%N a(N)=1+2*A034784(N)。
%这些项是奇数素数。
%H Michael De Vlieger,n的表,a(n)表示n=1..10000</a>
%t 1+2位置[#,2]&@表[k=1;而[!PrimeQ[k n+1],k++];k、 {n,165}]//扁平(*Michael De Vlieger_,2017年7月31日*)
%o(PARI)lista(nn)=对于(n=1,nn,if(i素数(p=2*n+1)&&!i素数(n+1),打印1(p,“,”););\\_米歇尔·马库斯,2017年8月1日
%Y参见A034693、A034694、A034784。
%K nonn公司
%O 1,1号机组
%Abos Elemer(_L)_
%E编辑:N.J.A.Sloane,2012年10月27日
|