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

2, 7, 13, 87517, 2891668030768721, 70625274624238913, 103865292721379353050549556815505213549, 8541928234907492663056090579782886424256601

Offset

1,1

Comments

Next term is too large to include.

The next term has 231 digits. - Harvey P. Dale, Dec 16 2021

Links

Table of n, a(n) for n=1..8.

Formula

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

Mathematica

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 *)

Crossrefs

Cf. A000040, A102117, A102151-A102165.

Sequence in context: A102152 A102156 A102151 * A102155 A102154 A102153

Adjacent sequences: A102154 A102155 A102156 * A102158 A102159 A102160

Keyword

nonn,base,less

Author

Jonathan Vos Post and Ray Chandler, Dec 31 2004

Extensions

Offset changed to 1 by Jinyuan Wang, Aug 12 2021

Status

approved