%I#10 2020年6月9日07:21:39

%S 3,5,7,11,19,37,671312635231031205340998209164213277165539，

%电话：131101262147524341104858320971694194371838861916777259，

%电话：335544736710896113421775726843595365367092310737418272147483659

%N素数p+2^N产生于A056206。

%H Robert Israel，n表，n=0..2000的a（n）</a>

%e n=13，2^13+p=8192+p不是p=2,3,5,7,11,13的素数。首先，对于p=17，8209是素数；获得的素数也为许多较大的p，其次是8221。所以a（13）=8209，最小的。

%p f：=proc（n）局部p，q，t；

%p t：=2^n；p： =1；

%p do公司

%p:=下一素数（p）；

%pq：=p+t；

%p如果isprime（q），则返回q-fi

%日期

%p端程序：

%p映射（f，[$0..50]）；#_罗伯特·伊斯雷尔，2019年8月22日

%t a[n_]：=模[{p=1，q，t=2^n}，而[True，p=NextPrime[p]；q=p+t；如果[PrimeQ[q]，返回[q]]]；

%t a/@Range[0，50]（*_Jean-François Alcover_，2020年6月9日，在Maple之后*）

%Y参考A056206。

%K nonn公司

%0、1

%A _Labos Elemer，2000年10月6日

%E a（0）=3由_Robert Israel_插入，2019年8月22日