|
| |
|
|
A031877
|
|
Nontrivial reversal numbers (integer multiples of their reversals), excluding palindromic numbers and multiples of 10.
|
|
12
| |
|
|
1, 8712, 9801, 87912, 98901, 879912, 989901, 8799912, 9899901, 87128712, 87999912, 98019801, 98999901, 871208712, 879999912, 980109801, 989999901, 8712008712, 8791287912, 8799999912, 9801009801, 9890198901, 9899999901
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
REFERENCES
| Ball and Coxeter. Mathematical Recreations and Essays, 13th ed. New York: Dover, pp. 14-15, 1987.
G. H. Hardy, A Mathematician's Apology (Cambridge Univ. Press 2000), pp. 104-105 (describing this problem as having "nothing in [it] which appeals much to a mathematician.").
Lara Pudwell, "Digit Reversal Without Apology", Mathematics Magazine, Vol. 80 (2007), pp. 129-132.
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
|
MATHEMATICA
| fQ[n_] := Block[{id = IntegerDigits@n}, Mod[n, FromDigits@ Reverse@id] == 0 && n != FromDigits@ Reverse@ id && Mod[n, 10] > 0]; k = 1; lst = {}; While[k < 10^9, If[fQ@k, AppendTo[lst, k]; Print@k]; k++ ]; lst [From Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 11 2010]
|
|
|
CROSSREFS
| Cf. A008919 for reversals.
Cf. A031877, A169824.
Sequence in context: A205763 A203737 A170796 * A035909 A031852 A115614
Adjacent sequences: A031874 A031875 A031876 * A031878 A031879 A031880
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com)
|
|
|
EXTENSIONS
| More terms from Jud McCranie (JudMcCranie(AT)ugaalum.uga.edu), Aug 15 2001
|
| |
|
|