login
Numbers n such that (digital reversal of n) - n = 9.
1

%I #8 Oct 28 2017 17:25:07

%S 12,23,34,45,56,67,78,89

%N Numbers n such that (digital reversal of n) - n = 9.

%C The sequence is complete: there is no other such number (in base 10).

%H Tanya Khovanova, <a href="http://www.tanyakhovanova.com/RecursiveSequences/NonRecursions.html">Non Recursions</a>

%e 98-89=9

%t Select[Range[1000],FromDigits[Reverse[IntegerDigits[#]]]-#==9&] (* _Harvey P. Dale_, Aug 26 2011 *)

%t Select[Range[1000],IntegerReverse[#]-#==9&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Oct 28 2017 *)

%Y Cf. A104341.

%K base,nonn,fini,full

%O 1,1

%A _Zak Seidov_, Mar 02 2005