OFFSET
1,2
COMMENTS
This is the complement of sequence A175382.
This sequence is infinite (because it contains all powers of 2).
The union of powers of 2 and numbers of the form 2^n + 2^k, where floor(n/2) <= k < n. - Ivan Neretin, Nov 24 2016
LINKS
Ivan Neretin, Table of n, a(n) for n = 1..10000
EXAMPLE
20 in binary is 10100. The positive integers that, when written in binary, occur as substrings in 10100 are: 1 (1 in binary), 2 (10 in binary), 4 (100 in binary), 5 (101 in binary), 10 (1010 in binary), and 20 (10100 in binary.) Since 1, 2, 4, 5, 10, and 20 each are a divisor of 20, then 20 is in this sequence.
MATHEMATICA
mx = 12; Union[2^Range[0, mx], Flatten@Table[2^n + 2^k, {n, 0, mx}, {k, Quotient[n, 2], n - 1}]] (* Ivan Neretin, Nov 24 2016 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Leroy Quet, Apr 24 2010
EXTENSIONS
Spelling corrected by Jason G. Wurtzel, Sep 04 2010
a(11)-a(53) from Lars Blomberg, May 05 2011
STATUS
approved