A151757 Positive integers n, excluding 1 and 2^i+1 for all i, having wt <= 3.

4, 6, 7, 8, 10, 11, 12, 13, 14, 16, 18, 19, 20, 21, 22, 24, 25, 26, 28, 32, 34, 35, 36, 37, 38, 40, 41, 42, 44, 48, 49, 50, 52, 56, 64, 66, 67, 68, 69, 70, 72, 73, 74, 76, 80, 81, 82, 84, 88, 96, 97, 98, 100, 104, 112, 128, 130, 131, 132, 133, 134, 136, 137, 138, 140, 144, 145, 146

Offset: 1

Author

N. J. A. Sloane, Jun 21 2009

Keywords

• nonn

Comments

Arises in analyzing A151755.

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000120, A048645, A151755.

Programs

Maple

N:= 8: # for terms <= 2^(N+1)
Res1:= {seq(2^i,i=2..N)}:
Res2:= {seq(seq(2^i+2^j,i=1..j-1),j=2..N)}:
Res3:= {seq(seq(seq(2^i+2^j+2^k, i=0..j-1),j=1..k-1),k=2..N)}:
sort(convert(Res1 union Res2 union Res3,list)); # Robert Israel, Mar 27 2020