Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A102154
Iccanobirt primes (4 of 15): Prime numbers in A102114.
1
2, 7, 13, 823541, 131622637, 42562230754481, 81409990081365019, 854720149266848129, 10368894671263026260137261, 462512205427594928694039517, 2554464709394644494293414485734745657, 10316628799362671595219100337312778857284159, 124041034096767708661687005571699720680324204493
OFFSET
1,1
FORMULA
a(n) = A102114(A102134(n)).
MATHEMATICA
nxt[{a_, b_, c_}] := {b, c, IntegerReverse[c] + b + a}; Select[ NestList[ nxt, {0, 0, 1}, 400][[ All, 1]], PrimeQ] (* Harvey P. Dale, Apr 14 2022 *)
CROSSREFS
KEYWORD
nonn,less,base
AUTHOR
EXTENSIONS
Offset changed to 1 and more terms from Jinyuan Wang, Aug 10 2021
STATUS
approved