%I#13 2021年2月6日22:09:37

%S 1,6,14,18,22,26,34,36,38,46,48,62,66,74106108110122134146156，

%电话：166170174178194196198206226230254262274278290294298，

%电话：306318543623743863923944164204224264584646849050251516526528530532544562

%N数k，使k+A037276（k）为素数。

%C除1项外，所有项均为偶数。

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

%e a（3）=14是一个项，因为14+A037276（14）=14+27=41是素数。

%p dcat：=proc（L）局部i，x；

%p x：=L[-1]；

%p for i from nops（L）-1 to 1 by-1 do

%px:=10^（1+ilog10（x））*L[i]+x

%p od；

%p x

%p结束过程：

%p A037276:=程序（n）局部F；

%p F:=排序（ifactors（n）[2]，（a，b）->a[1]<b[1]）；

%p dcat（映射（t->t[1]$t[2]，F））；

%p端程序：

%p A037276（1）：=1：

%p选择（t->isprime（t+A037276（t）），[1，seq（i，i=3..1000）]）；

%Y参见A037276、A340633和A340636。

%K nonn，基础

%O 1,2号机组

%A _J.M.Bergot和_Robert Israel，2021年1月14日