login
A230058
Numbers of the form k + wt(k) for at least two distinct k, where wt(k) = A000120(k) is the binary weight of k.
7
5, 14, 17, 19, 22, 31, 33, 36, 38, 47, 50, 52, 55, 64, 67, 70, 79, 82, 84, 87, 96, 98, 101, 103, 112, 115, 117, 120, 129, 131, 132, 134, 143, 146, 148, 151, 160, 162, 165, 167, 176, 179, 181, 184, 193, 196, 199, 208, 211, 213, 216, 225, 227, 230, 232, 241, 244
OFFSET
1,1
COMMENTS
The positions of entries greater than 1 in A228085, or numbers that appear multiple times in A092391.
Numbers that can be expressed as the sum of distinct terms of the form 2^n+1, n=0,1,... in multiple ways.
LINKS
Vincenzo Librandi and Donovan Johnson, Table of n, a(n) for n = 1..10000 (first 1000 terms from Vincenzo Librandi)
EXAMPLE
5 = 3 + 2 = 4 + 1, so 5 is in this list.
MATHEMATICA
Sort[Transpose[Select[Tally[Table[k + Total[IntegerDigits[k, 2]], {k, 0, 300}]], #[[2]] > 1 &]][[1]]] (* T. D. Noe, Oct 09 2013 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Matthew C. Russell, Oct 07 2013
STATUS
approved