

A058898


Inconsummate numbers in base 2: no number is this multiple of the sum of its digits (in base 2).


16



13, 19, 25, 26, 35, 38, 47, 49, 50, 52, 55, 67, 70, 76, 94, 95, 97, 98, 100, 103, 104, 109, 110, 115, 117, 131, 134, 140, 151, 152, 157, 159, 171, 175, 179, 183, 185, 187, 188, 190, 193, 194, 196, 199, 200, 203, 206, 208, 217, 218, 220, 227, 229
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Equivalently, these are the natural numbers that cannot be written as the arithmetic mean of distinct powers of 2. [From Brian Kell, Feb 28 2009]


LINKS

Daniel Mondot, Table of n, a(n) for n = 1..33099
D. Radcliffe, Inconsummate Numbers [broken link]


FORMULA

n such that A065413(n) = 0. [From Brian Kell, Mar 01 2009]


MAPLE

For Maple code see A058906.


MATHEMATICA

Do[k = n; While[ Apply[ Plus, IntegerDigits[k, 2] ]*n != k && k < 250n, k += n]; If[k == 250n, Print[n] ], {n, 1, 10^3} ]


CROSSREFS

Cf. A003635, A052491, A058899A058907.
Sequence in context: A109902 A214031 A250293 * A227092 A123840 A258589
Adjacent sequences: A058895 A058896 A058897 * A058899 A058900 A058901


KEYWORD

nonn,base


AUTHOR

N. J. A. Sloane, Jan 09 2001


STATUS

approved



