%I#7 2021年5月25日01:38:07

%S 4,5,6,7,8,15,18,19,26,33,44,50,64,69,74115138139150151161170，

%电话：2082132182322333372462582752892903033093103134，

%电话：34035235336036937364054124414839495503507514529610615633638645648658

%N数k，使A101203（k）为素数。

%C数k使得非素数<=k的和是素数。

%如果p是素数，那么p是成员当且仅当p-1是成员。

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

%e a（3）=6是一个成员，因为A101203（6）=1+4+6=11是素数。

%p s：=proc（n）选项记忆；如果是isprime（n），则进程名（n-1）否则进程名（n-1）+n fi结束进程：

%p s（1）：=1：

%p选择（n->isprime（s（n）），[1..1000]）；

%Y参考A101203，A228102。

%K nonn公司

%O 1,1号机组

%A _J.M.Bergot和_Robert Israel，2021年5月23日