OFFSET
1,1
COMMENTS
The number of steps starts at 0, so palindromes (cf. A002113) are excluded.
Numbers k such that A033665(k) = 5. - Andrew Howroyd, Dec 06 2024
LINKS
MATHEMATICA
palQ[k_]:=IntegerDigits[k]==Reverse[IntegerDigits[k]]; fraQ[n_]:= Module[ {ras=NestList[#+FromDigits[Reverse[IntegerDigits[#]]]&, n, 5]}, palQ/@ ras=={False, False, False, False, False, True}]; Select[Range[2000], fraQ] (* Harvey P. Dale, Sep 28 2015 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Klaus Brockhaus, Oct 21 2001
EXTENSIONS
Offset changed to 1 by Harry J. Smith, Oct 14 2009
STATUS
approved