|
|
A247110
|
|
n + reversal of digits of n, when n is not palindromic
|
|
0
|
|
|
11, 33, 44, 55, 66, 77, 88, 99, 110, 22, 33, 55, 66, 77, 88, 99, 110, 121, 33, 44, 55, 77, 88, 99, 110, 121, 132, 44, 55, 66, 77, 99, 110, 121, 132, 143, 55, 66, 77, 88, 99, 121, 132, 143, 154, 66, 77, 88, 99, 110, 121, 143, 154, 165, 77, 88, 99, 110, 121, 132, 143, 165, 176, 88, 99, 110, 121, 132, 143, 154, 165, 187, 99, 110, 121
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
10,1
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{n=50}, (FromDigits[#] + FromDigits[Reverse[#]]) & /@ Select[IntegerDigits[Range[n]], # != Reverse[#] &]]
Table[If[n==IntegerReverse[n], Nothing, n+IntegerReverse[n]], {n, 100}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 29 2016 *)
|
|
CROSSREFS
|
Cf. A056964 (n + reversal of digits of n)
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|