|
|
A065319
|
|
30 'Reverse and Add' steps are needed to reach a palindrome.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
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
|
|
|
MATHEMATICA
|
lenQ[n_]:= Length[NestWhileList[# + FromDigits[Reverse[IntegerDigits[#]]]&, n, #! = FromDigits[Reverse[IntegerDigits[#]]]&, 1, 31]] == 31; Select[Range[10000], lenQ] (* Vincenzo Librandi, Sep 24 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|