|
Search: id:A084687
|
|
|
| A084687 |
|
Nontrivial numbers containing no zero digits which are divisible by the number formed by writing its digits in ascending order. |
|
+0
6
|
|
| 9513, 81816, 93513, 94143, 95193, 816816, 888216, 933513, 934143, 935193, 941493, 951993, 2491578, 8166816, 8868216, 9333513, 9334143, 9335193, 9341493, 9351993, 9414993, 9519993, 24915798, 49827156, 81666816, 87127446, 88668216, 93333513
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Sequence excludes numbers which are already sorted, like 1234 or 133778, as sorting such numbers yields the same number which is of course evenly divisible by itself, a trivial case.
All members of this sequence appear to be divisible by 3. Further, many of the terms of the sequence can be generated patternistically simply by inserting digits in certain places in earlier terms. The primitive terms of this sequence which cannot be patternistically generated are in sequence A086083.
|
|
EXAMPLE
|
9513/1359 = 7; 9876543192/1234567899 = 8; etc.
|
|
MATHEMATICA
|
Select[ Range[ 10^8], IntegerQ[ # /FromDigits[ Sort[ IntegerDigits[ # ]]]] && # != FromDigits[ Sort[ IntegerDigits[ # ]]] && Count[ IntegerDigits[ # ], 0] == 0 & ]
|
|
CROSSREFS
|
Cf. A086083.
Sequence in context: A110076 A156402 A139676 this_sequence A086083 A161002 A134117
Adjacent sequences: A084684 A084685 A084686 this_sequence A084688 A084689 A084690
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Chuck Seggelin (barkeep(AT)plastereddragon.com), Jun 30 2003
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 07 2003
|
|
|
Search completed in 0.002 seconds
|
