|
Search: id:A121970
|
|
|
| A121970 |
|
Numbers n such that if you subtract n from its reversal you get a positive number with the same digits as n. |
|
+0
1
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
If negative numbers are included then the sequence is the above together with its reversals. - Robert G. Wilson v Sep 11 2006.
|
|
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, A121970.
Adjacent sequences: A121967 A121968 A121969 this_sequence A121971 A121972 A121973
Sequence in context: A093058 A062043 A124620 this_sequence A055162 A055159 A124694
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Tanya Khovanova (tanyakh(AT)yahoo.com), Sep 04 2006
|
|
|
Search completed in 0.002 seconds
|
