OFFSET
1,2
MATHEMATICA
NestList[#+FromDigits[RotateLeft[IntegerDigits[#]]]&, 1, 40] (* Harvey P. Dale, Jun 29 2017 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Armand Turpel armandt(AT)unforgettable.com
EXTENSIONS
More terms from Harvey P. Dale, Jun 29 2017
STATUS
approved