login
Absolute({n concatenate R(n)}-{ R(n) concatenate n}), R(n) = digit reversal of n.
2

%I #22 Jun 28 2021 10:07:12

%S 891,0,891,1782,2673,3564,4455,5346,6237,7128,1782,891,0,891,1782,

%T 2673,3564,4455,5346,6237,2673,1782,891,0,891,1782,2673,3564,4455,

%U 5346,3564,2673,1782,891,0,891,1782,2673,3564,4455,4455,3564,2673,1782,891,0,891

%N Absolute({n concatenate R(n)}-{ R(n) concatenate n}), R(n) = digit reversal of n.

%C a(palindrome ) = 0. a(n) = a(R(n)).

%C When concatenating the reversal after n the leading zeros are not dropped. - _Tanya Khovanova_, Jun 28 2021

%H G. C. Greubel, <a href="/A110726/b110726.txt">Table of n, a(n) for n = 10..999</a>

%F When n has two digits a(n)= 891*ABS(x-y), (Here x,y are the digits of n and ABS(n) is the absolute value of n.). - Keith Schneider, Jun 16 2007

%e a(12) = ABS(1221-2112) = 891.

%e a(10) = ABS(1001-110) = 891. - _Tanya Khovanova_, Jun 28 2021

%t Abs[Table[FromDigits[Join[IntegerDigits[n], Reverse[IntegerDigits[n]]]] - FromDigits[Join[Reverse[IntegerDigits[n]], IntegerDigits[n]]], {n, 10, 60}]] (* _G. C. Greubel_, Sep 06 2017 *)

%Y Cf. A004086, A110722, A110723, A110724, A110725, A110727.

%K base,easy,nonn

%O 10,1

%A _Amarnath Murthy_, Aug 09 2005

%E More terms from _Sean A. Irvine_, Feb 14 2011