A102157 - OEIS

%I #14 Dec 16 2021 19:20:08

%S 2,7,13,87517,2891668030768721,70625274624238913,

%T 103865292721379353050549556815505213549,

%U 8541928234907492663056090579782886424256601

%N Iccanobirt primes (7 of 15): Prime numbers in A102117.

%C Next term is too large to include.

%C The next term has 231 digits. - _Harvey P. Dale_, Dec 16 2021

%F a(n) = A102117(A102137(n)).

%t nxt[{a_,b_,c_}]:={b,c,Total[IntegerReverse/@{a,b,c}]};Select[NestList[nxt,{0,0,1},200][[All,1]],PrimeQ] (* _Harvey P. Dale_, Dec 16 2021 *)

%Y Cf. A000040, A102117, A102151-A102165.

%K nonn,base,less

%O 1,1

%A _Jonathan Vos Post_ and _Ray Chandler_, Dec 31 2004

%E Offset changed to 1 by _Jinyuan Wang_, Aug 12 2021