%我#19 2021年3月20日11:04:27

%S 2,41,61,83281487683881288748896883887468894888368881，

%电话：888834688836888616888898878728887888874888888988688872888888888681，

%电话：2888883488888888788888678888832888888896688887678888883888888888

%N素数，其中a（1）=2，a（N+1）=最小素数，这样（a（N）的偶数位数之和）<（a（N+1）的偶数位之和）。

%t f[n_]：=块[{m=Total@选择[IntegerDigits@n，EvenQ]，p=2}，而[Total@Select[Integer Digits@p，EvenQ]<=m，p=NextPrime@p]；p] ；NestList[f，2，31]（*_Robert G.Wilson v_，2014年6月23日*）

%Y参考A000040。

%K nonn，基数，减去

%O 1,1号机组

%A _Juri-Stepan Gerasimov，2009年3月12日和18日

%E定义由N.J.A.Sloane修正，2009年3月19日

%E a（12），来自阿尔文·胡佛皮带，2009年5月20日

%E定义由D.S.McNeil_于2009年12月10日澄清

%E缺失值683和8887，由_D.S.McNeil_插入和扩展，2009年12月10日

%E a（26）-a（32）摘自_Robert G.Wilson v_，2014年6月23日