|
| |
|
|
A186703
|
|
Balanced ternary non-Harshad numbers.
|
|
0
|
|
|
|
2, 6, 8, 13, 16, 18, 20, 24, 26, 31, 32, 37, 41, 46, 48, 52, 54, 56, 60, 62, 67, 70, 72, 74, 78, 80, 85, 86, 91, 94, 96, 98, 103, 104, 109, 115, 118, 119, 121, 122, 125, 130, 131, 136, 138, 142, 144, 146, 149, 154, 156, 160
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Numbers not divisible by the sum of their balanced ternary digits.
All terms of A174658 are in this sequence because their balanced ternary digits add up to 0.
Terms of this sequence not in A174658 are generally prime numbers.
|
|
|
LINKS
|
Table of n, a(n) for n=1..52.
|
|
|
EXAMPLE
|
The balanced ternary representation of 13 is {1, 1, 1}, which adds up to 3. Since 3 does not divide 13 evenly, 13 is in the list.
The balanced ternary representation of 17 is {1, -1, 0, -1}, this adds up to -1, which divides 17 evenly. Therefore, 17 is not in the list.
|
|
|
MATHEMATICA
|
(* First run the program for A065363 to define balTernDigits *) Complement[Range[200], Select[Range[200], Plus@@balTernDigits[#] != 0 && IntegerQ[#/(Plus@@balTernDigits[#])] &]]
|
|
|
CROSSREFS
|
Cf. A005349, base 10 Harshad numbers.
Sequence in context: A224470 A168247 A229056 * A054248 A038108 A294862
Adjacent sequences: A186700 A186701 A186702 * A186704 A186705 A186706
|
|
|
KEYWORD
|
nonn,base
|
|
|
AUTHOR
|
Alonso del Arte, Feb 25 2011
|
|
|
STATUS
|
approved
|
| |
|
|
