A065319 30 'Reverse and Add' steps are needed to reach a palindrome.

10548, 11538, 12528, 13518, 14508, 20547, 21537, 22527, 23517, 24507, 30546, 31536, 32526, 33516, 34506, 40545, 40849, 41535, 41839, 42525, 42829, 43515, 43819, 44505, 44809, 44899, 45889, 46879, 47869, 48859, 49849, 50544, 50848

Offset: 1

Author

Klaus Brockhaus, Oct 30 2001

Keywords

• nonn
• base

Comments

The number of steps starts at 0, so palindromes (cf. A002113) are excluded. 30 is a record (cf. A065199) of the number of 'Reverse and Add' steps needed to reach a palindrome.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000
• Index entries for sequences related to Reverse and Add!

Crossrefs

Cf. A002113, A065198, A065199, A065318.

Programs

Mathematica

lenQ[n_]:= Length[NestWhileList[# + FromDigits[Reverse[IntegerDigits[#]]]&, n, #! = FromDigits[Reverse[IntegerDigits[#]]]&, 1, 31]] == 31; Select[Range[10000], lenQ] (* Vincenzo Librandi, Sep 24 2013 *)

Extensions

Changed offset from 0 to 1 by Vincenzo Librandi, Sep 24 2013