login
This site is supported by donations to The OEIS Foundation.

 

Logo

"Email this user" was broken Aug 14 to 9am Aug 16. If you sent someone a message in this period, please send it again.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A121970 Numbers n such that if you subtract n from its reversal you get a positive number with the same digits as n. 0
459, 1467, 1692, 3285, 8019, 14967, 16992, 23706, 23769, 24894, 26496, 32796, 32985, 37206, 40698, 44397, 45207, 49599, 62298, 80199, 80919, 104697, 106992, 108729, 108972, 127809, 134667, 135378, 135774, 136818, 136962, 145827, 147492 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

If negative numbers are included then the sequence is the above together with its reversals. - Robert G. Wilson v, Sep 11 2006

LINKS

Table of n, a(n) for n=1..33.

Kevin Browne, Subtracting the Reversal.

EXAMPLE

459 is a member because 954 - 459 = 495; 16992 is a member because 29961 - 16992 = 12969.

MATHEMATICA

Select[Table[n, {n, 200000}], ToExpression[StringReverse[ToString[ # ]]] - # > 0 && Sort[IntegerDigits[ # ]] == Sort[IntegerDigits[ToExpression[StringReverse[ToString[ # ]]] - # ]] &]

fQ[n_] := Block[{id = IntegerDigits@n}, rev = FromDigits@ Reverse@id; rev > n && Sort@id == Sort@IntegerDigits[rev - n]]; Select[ Range@153971, fQ@# &] (* Robert G. Wilson v, Sep 11 2006 *)

CROSSREFS

Cf. A055161, A121969.

Sequence in context: A062043 A124620 A224456 * A055162 A055159 A124694

Adjacent sequences:  A121967 A121968 A121969 * A121971 A121972 A121973

KEYWORD

base,nonn

AUTHOR

Tanya Khovanova, Sep 04 2006

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified August 18 19:41 EDT 2017. Contains 290762 sequences.