OFFSET
1,1
COMMENTS
Next term is too large to include.
The next term (a(8)) has 394 digits. The term after that (a(9)) has 1063 digits, and a(10) has 2599 digits. - Harvey P. Dale, Dec 26 2022
MATHEMATICA
nxt[{a_, b_, c_}]:={b, c, a+FromDigits[Reverse[IntegerDigits[b]]]+c}; Select[NestList[nxt, {0, 0, 1}, 200][[All, 1]], PrimeQ] (* Harvey P. Dale, Dec 26 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jonathan Vos Post and Ray Chandler, Dec 31 2004
EXTENSIONS
Offset changed to 1 by Jinyuan Wang, Aug 08 2021
STATUS
approved